home *** CD-ROM | disk | FTP | other *** search
/ Aminet 32 / Aminet 32 (1999)(Schatztruhe)[!][Aug 1999].iso / Aminet / biz / demo / golded6.lha / Demo / Install < prev    next >
Windows Autorun File  |  1999-05-29  |  131KB  |  3,935 lines

  1. ; $VER: GoldED Studio 6.0.0 (8.5.1999)
  2.  
  3. (delopts "oknodelete" "force" "askuser")
  4.  
  5. ; -------------------------------- set constants -------------------------------
  6.  
  7. (set @studio_found                   1  )
  8. (set @studio_missing                 0  )
  9.  
  10. (set @studio_installtype_minimum     0  )
  11. (set @studio_installtype_user        1  )
  12. (set @studio_installtype_normal      2  )
  13.  
  14. (set @studio_components_golded       1  )
  15. (set @studio_components_starter      2  )
  16. (set @studio_components_docs         4  )
  17. (set @studio_components_addons       8  )
  18. (set @studio_components_developer    16 )
  19. (set @studio_components_screenshot   32 )
  20. (set @studio_components_recover      64 )
  21. (set @studio_components_config       128)
  22. (set @studio_components_all          255)
  23.  
  24. (set @studio_preset_display          1  )
  25. (set @studio_preset_interface        2  )
  26. (set @studio_preset_hunter           4  )
  27. (set @studio_preset_printer          8  )
  28. (set @studio_preset_context          16 )
  29. (set @studio_preset_syntax           32 )
  30. (set @studio_preset_layout           64 )
  31. (set @studio_preset_mouse            128)
  32. (set @studio_preset_menu             256)
  33.  
  34. (set @studio_preset_api              1  )
  35. (set @studio_preset_project          2  )
  36. (set @studio_preset_references       4  )
  37. (set @studio_preset_gadgets          8  )
  38. (set @studio_preset_tabs             16 )
  39. (set @studio_preset_keyboard         32 )
  40. (set @studio_preset_templates        64 )
  41. (set @studio_preset_misc             128)
  42. (set @studio_preset_dictionary       256)
  43.  
  44. (set @studio_cpu_68000               0  )
  45. (set @studio_cpu_68020               1  )
  46. (set @studio_cpu_68030               2  )
  47. (set @studio_cpu_68040               3  )
  48. (set @studio_cpu_68060               4  )
  49.  
  50. (set @studio_addons_envwww           1  )
  51. (set @studio_addons_envgde           2  )
  52. (set @studio_addons_envthe           4  )
  53. (set @studio_addons_envcpp           8  )
  54. (set @studio_addons_envstm           16 )
  55. (set @studio_addons_envsas           32 )
  56.  
  57. (set @studio_addons_envasm           1  )
  58. (set @studio_addons_envbat           2  )
  59. (set @studio_addons_envfax           4  )
  60. (set @studio_addons_envmdt           8  )
  61. (set @studio_addons_envthr           16 )
  62. (set @studio_addons_envjcy           32 )
  63.  
  64. (set @studio_addons_envprt           1  )
  65. (set @studio_addons_envrcs           2  )
  66. (set @studio_addons_envins           4  )
  67. (set @studio_addons_envwrp           8  )
  68. (set @studio_addons_envreg           16 )
  69. (set @studio_addons_envswp           32 )
  70.  
  71. (set @updatemode_reinstall           0  )
  72. (set @updatemode_add                 1  )
  73. (set @updatemode_remove              2  )
  74. (set @updatemode_presets             3  )
  75. (set @updatemode_registry            4  )
  76. (set @updatemode_startup             5  )
  77. (set @updatemode_exit                6  )
  78.  
  79. (set @studio_starter_ed              1  )
  80. (set @studio_starter_appicon         2  )
  81.  
  82. (set @studio_manual_history          1  )
  83. (set @studio_manual_licence          2  )
  84. (set @studio_manual_order            4  )
  85. (set @studio_manual_english          8  )
  86. (set @studio_manual_german           16 )
  87.  
  88. ; -------------------------------- set variables -------------------------------
  89.  
  90. (set studio_found         @studio_missing)
  91. (set studio_updatemode    @updatemode_components)
  92. (set studio_registered    0)
  93. (set studio_yourname     "")
  94. (set studio_serial       "")
  95. (set studio_path         "")
  96. (set studio_update       "")
  97. (set studio_language     "")
  98. (set studio_regedit      "")
  99. (set studio_components    0)
  100. (set studio_starter       0)
  101. (set studio_manual        0)
  102. (set studio_addons_a      0)
  103. (set studio_addons_b      0)
  104. (set studio_addons_c      0)
  105. (set studio_reboot        0)
  106.  
  107. ; -------------------------------- set strings ---------------------------------
  108.  
  109. (if (= @language "deutsch")
  110.  
  111.     (
  112.         (set #studio_reboot "Bitte starten Sie den Rechner nach der Installation neu !")
  113.  
  114.         (set #studio_cderr "Datei nicht gefunden. Das installierte CD-Dateisystem ist fehlerhaft oder inkompatibel. Weitere Informationen finden Sie in der FAQ-Datei.")
  115.  
  116.         (set #studio_filenotfound "Datei nicht gefunden.")
  117.  
  118.         (set #studio_demo
  119.  
  120.             (cat
  121.  
  122.                 "GoldED Studio kann nicht über die Demo-Version      \n"
  123.                 "installiert werden (und umgekehrt). Deinstallieren  \n"
  124.                 "Sie zuerst die Demo-Version oder installieren Sie   \n"
  125.                 "in ein anderes Verzeichnis.                         \n"
  126.             )
  127.         )
  128.  
  129.         (set #studio_rexxerr
  130.  
  131.             (cat
  132.  
  133.                 "Warnung: Die ARexx-Installation ist unvollständig.  \n"
  134.                 "Die folgende Datei konnte nicht gefunden werden:    \n"
  135.                 "                                                    \n"
  136.             )
  137.         )
  138.  
  139.         (set #studio_overwrite
  140.  
  141.             (cat
  142.  
  143.                 "An dieser Stelle existiert schon ein Verzeichnis mit\n"
  144.                 "dem Namen Studio ! Soll mit der Installation in     \n"
  145.                 "dieses Verzeichnis fortgefahren werden ?            \n"
  146.             )
  147.         )
  148.  
  149.         (set #studio_overwrite_help
  150.  
  151.             (cat
  152.  
  153.                 "Möglicherweise gehört dieses Verzeichnis zu einem   \n"
  154.                 "anderen Programm oder einer älteren unvollständigen \n"
  155.                 "Installation.                                       \n"
  156.             )
  157.         )
  158.  
  159.         (set #studio_overwrite_install "Installieren")
  160.  
  161.         (set #studio_overwrite_cancel  "Anderes Verzeichnis wählen")
  162.  
  163.         (set #studio_badkick "Dieses Programm benötigt AmigaOS 3 !")
  164.  
  165.         (set #studio_notify
  166.  
  167.             (cat
  168.  
  169.                 "Während der letzten Installation ist ein Fehler     \n"
  170.                 "aufgetreten. Wir empfehlen die Wiederholung einer   \n"
  171.                 "Minimalinstallation in ein neues Verzeichnis.       \n"
  172.                 "                                                    \n"
  173.                 "Beenden sie bitte vor der erneuten Installation alle\n"
  174.                 "anderen laufenden Programme !                       \n"
  175.             )
  176.         )
  177.  
  178.         (set #studio_welcome
  179.  
  180.             (cat
  181.  
  182.                 "Willkommen beim GoldED Studio Setup !               \n"
  183.                 "                                                    \n"
  184.                 "Mit diesem Programm wird GoldED Studio auf Ihrem    \n"
  185.                 "Computer installiert oder aktualisiert.             \n"
  186.                 "                                                    \n"
  187.                 "Es wird dringend empfohlen, alle anderen Programme  \n"
  188.                 "zu beenden, bevor Sie mit dem Setup fortfahren.     \n"
  189.                 "                                                    \n"
  190.                 "WARNUNG: Diese Software ist durch das nationale und \n"
  191.                 "internationale Urheberrecht geschützt. Unerlaubter  \n"
  192.                 "Vertrieb oder Verleih der Software oder einer ihrer \n"
  193.                 "Komponenten wird verfolgt.                          \n"
  194.             )
  195.         )
  196.  
  197.         (set #studio_installerr
  198.  
  199.             (cat
  200.  
  201.                 "Während der Installation ist ein Fehler aufgetraten.\n"
  202.                 "Eine Beschreibung der Fehlerursache finden Sie in   \n"
  203.                 "der Log-Datei im T:-Verzeichnis, sofern Sie zu      \n"
  204.                 "Beginn der Installation die Option LOGDATEI ERZEUGEN\n"
  205.                 "gewählt haben. Der Fehlercode ist:                  \n"
  206.                 "                                                    \n"
  207.             )
  208.         )
  209.  
  210.         (set #studio_yourname "Geben Sie Ihren Namen ein:")
  211.  
  212.         (set #studio_yourname_help
  213.  
  214.             (cat
  215.  
  216.                 "Die Eingabe des Namens ist zur Produktregistrierung \n"
  217.                 "erforderlich. Ohne Registrierung können Sie diese   \n"
  218.                 "Software nicht installieren.                        \n"
  219.             )
  220.         )
  221.  
  222.         (set #studio_serial "Geben Sie die Seriennummer ein:")
  223.  
  224.         (set #studio_serial_help
  225.  
  226.             (cat
  227.  
  228.                 "Sie finden die Seriennummer auf der Registrierkarte.\n"
  229.                 "Die Seriennummer besteht aus 21 Zeichen, die unter  \n"
  230.                 "Beachtung der Groß- und Kleinschreibung eingegeben  \n"
  231.                 "werden müssen.                                      \n"
  232.             )
  233.         )
  234.  
  235.         (set #studio_check
  236.  
  237.             (cat
  238.  
  239.                 "Ist diese Angabe korrekt ?                          \n"
  240.                 "                                                    \n"
  241.                 "%s, %s"
  242.             )
  243.         )
  244.  
  245.         (set #studio_check_continue "Korrekt")
  246.  
  247.         (set #studio_check_repeat "Eingabe wiederholen")
  248.  
  249.         (set #studio_found
  250.  
  251.             (cat
  252.  
  253.                 "Das Programm wurde schon einmal installiert:        \n"
  254.                 "                                                    \n"
  255.                 "Wählen Sie AKTUALISIEREN, um Komponenten            \n"
  256.                 "hinzuzufügen oder zu entfernen.                     \n"
  257.                 "                                                    \n"
  258.                 "Wählen Sie ANDERES VERZEICHNIS, um die Installation \n"
  259.                 "an anderer Stelle zu wiederholen.                   \n"
  260.             )
  261.         )
  262.  
  263.         (set #studio_found_help
  264.  
  265.             (cat
  266.  
  267.                 "AKTUALISIEREN                                       \n"
  268.                 "                                                    \n"
  269.                 "Ändert die vorhandene Installation. Dort vorhandne  \n"
  270.                 "Komponenten werden im weiteren Verlauf dieser       \n"
  271.                 "Installation aktualisiert.                          \n"
  272.                 "                                                    \n"
  273.                 "ANDERES VERZEICHNIS                                 \n"
  274.                 "                                                    \n"
  275.                 "Die Installation erfolgt in ein anderes Verzeichnis.\n"
  276.                 "Eine vorhandene Installation an anderer Stelle      \n"
  277.                 "bleibt erhalten. Sie sollten von dieser Möglichkeit \n"
  278.                 "nur Gebrauch machen, wenn mit der vorhandenen       \n"
  279.                 "Installation Probleme auftauchen, die eine          \n"
  280.                 "Aktualisierung nicht ratsam erscheinen lassen.      \n"
  281.             )
  282.         )
  283.  
  284.         (set #studio_found_confirm "Aktualisieren")
  285.  
  286.         (set #studio_found_newinstall "Anderes Verzeichnis")
  287.  
  288.         (set #studio_path_choose
  289.  
  290.             (cat
  291.  
  292.                 "Wählen Sie einen Pfad für die Installation. In dem  \n"
  293.                 "gewählten Pfad wird ein Verzeichnis für GoldED      \n"
  294.                 "Studio erzeugt:                                     \n"
  295.             )
  296.         )
  297.  
  298.         (set #studio_path_choose_help
  299.  
  300.             (cat
  301.  
  302.                 "Der Speicherplatzbedarf auf dem gewählten Medium    \n"
  303.                 "hängt von dem weiteren Installationsablauf ab.      \n"
  304.                 "Maximal werden 30 MB Speicherplatz benötigt.        \n"
  305.                 "                                                    \n"
  306.                 "Die Installation über eine vorhandene GoldED 3 oder \n"
  307.                 "GoldED 4 Installation ist nicht möglich. Die alten  \n"
  308.                 "Einstellungen können aber später übernommen werden, \n"
  309.                 "da Studio 5 abwärtskompatibel zu diesen             \n"
  310.                 "Programmversionen ist.                              \n"
  311.             )
  312.         )
  313.  
  314.         (set #studio_installtype "Wählen Sie die gewünschte Installationsart:")
  315.  
  316.         (set #studio_installtype_help
  317.  
  318.             (cat
  319.  
  320.                 "Sie können später jederzeit einzelen Komponeten     \n"
  321.                 "nachinstallieren oder installierte Komponenten      \n"
  322.                 "entfernen, indem Sie das Setup-Programm erneut      \n"
  323.                 "ausführen.                                          \n"
  324.             )
  325.         )
  326.  
  327.         (set #studio_installtype_minimum "Minimalinstallation (500 KB)")
  328.         (set #studio_installtype_user    "Benutzerdefiniert (bis zu 25 MB)")
  329.         (set #studio_installtype_normal  "Typische Installation (2 MB)")
  330.  
  331.         (set #studio_checking "Überprüfen der vorhandenen Installation ...")
  332.  
  333.         (set #studio_updatemode_reinstall "Installation aktualisieren")
  334.         (set #studio_updatemode_add       "Komponenten hinzufügen")
  335.         (set #studio_updatemode_remove    "Komponenten entfernen")
  336.         (set #studio_updatemode_presets   "Grundeinstellungen installieren")
  337.         (set #studio_updatemode_registry  "Registry wiederherstellen")
  338.         (set #studio_updatemode_startup   "User-Startup korrigieren")
  339.         (set #studio_updatemode_exit      "Setup beenden")
  340.  
  341.         (set #studio_updatemode_help
  342.  
  343.             (cat
  344.  
  345.                 "INSTALLATION AKTUALISIEREN                          \n"
  346.                 "                                                    \n"
  347.                 "Die bisher installierten Komponenten (mit Ausnahme  \n"
  348.                 "der Grundseinstellungen) werden neu installiert.    \n"
  349.                 "                                                    \n"
  350.                 "KOMPONENTEN HINZUFÜGEN/ENTFERNEN                    \n"
  351.                 "                                                    \n"
  352.                 "Ändert die vorhandene Installation durch Hinzufügen \n"
  353.                 "oder Entfernen einzelner Komponenten (Add-Ons,      \n"
  354.                 "Dokumentationen, usw.).                             \n"
  355.                 "                                                    \n"
  356.                 "GRUNDEINSTELLUNGEN INSTALLIEREN                     \n"
  357.                 "                                                    \n"
  358.                 "Erlaubt die selektive Installation von Einstellungen\n"
  359.                 "(Menu, Farben, usw.). Der Editor verwendet die      \n"
  360.                 "Grundeinstellungen, wenn normale Texte bearbeitet   \n"
  361.                 "werden, für die kein besonderer Dateityp definiert  \n"
  362.                 "wurde.                                              \n"
  363.                 "                                                    \n"
  364.                 "REGISTRY WIEDERHERSTELLEN                           \n"
  365.                 "                                                    \n"
  366.                 "Stellt die zentrale Konfigurationsdatei wieder her. \n"
  367.                 "Sie verlieren dadurch alle globalen Einstellungen im\n"
  368.                 "Editor sowie weiterhin alle Dateitypen mit Ausnahme \n"
  369.                 "des Dateityps TEXT !                                \n"
  370.                 "                                                    \n"
  371.                 "USER-STARTUP KORRIGIEREN                            \n"
  372.                 "                                                    \n"
  373.                 "Es wird der notwendige Assign auf das Verzeichnis   \n"
  374.                 "des Editors eingerichtet.                           \n"
  375.             )
  376.  
  377.         )
  378.  
  379.         (set #studio_components_install
  380.  
  381.             (cat
  382.  
  383.                 "Wählen Sie die Komponentengruppen, die installiert  \n"
  384.                 "werden sollen:                                      \n"
  385.             )
  386.         )
  387.  
  388.         (set #studio_components_update
  389.  
  390.             (cat
  391.  
  392.                 "Wählen Sie die Komponentengruppen, die installiert  \n"
  393.                 "bzw. aktualisiert werden sollen:                    \n"
  394.             )
  395.         )
  396.  
  397.         (set #studio_components_remove
  398.  
  399.             (cat
  400.  
  401.                 "Wählen Sie die Komponentengruppen, die ganz oder    \n"
  402.                 "teilweise entfernt werden sollen:                   \n"
  403.             )
  404.         )
  405.  
  406.         (set #studio_components_help
  407.  
  408.             (cat
  409.  
  410.                 "GOLDED (1.76 MB)                                    \n"
  411.                 "                                                    \n"
  412.                 "Der Editor GoldED sowie die unmittelbar vom Editor  \n"
  413.                 "benötigten Dateien und Verzeichnisse.               \n"
  414.                 "                                                    \n"
  415.                 "STARTER (0 - 15 KB)                                 \n"
  416.                 "                                                    \n"
  417.                 "Startprogramme, die die Verwendung des Editors      \n"
  418.                 "vereinfachen (Drag & Drop).                         \n"
  419.                 "                                                    \n"
  420.                 "DOKUMENTATION (36 K - 700 KB)                       \n"
  421.                 "                                                    \n"
  422.                 "Die Online-Dokumentation.                           \n"
  423.                 "                                                    \n"
  424.                 "ADD-ONS (0 - 25 MB)                                 \n"
  425.                 "                                                    \n"
  426.                 "Mitgeliefert werden die Rechtschreibprüfung Joyce,  \n"
  427.                 "ein Thesaurus, Anpassungen an diverse C-Compiler,   \n"
  428.                 "die HTML-Umgebung Webworld (zur Bearbeitung von     \n"
  429.                 "HTML-Dateien mit dem Editor), Anpassungen an        \n"
  430.                 "verschiedene E-Mail-Programme, usw.                 \n"
  431.                 "                                                    \n"
  432.                 "ENTWICKLERUNTERLAGEN (830 KB)                       \n"
  433.                 "                                                    \n"
  434.                 "Material für die Entwicklung von Erweiterungen für  \n"
  435.                 "GoldED: Quelltexte, Autodocs, Includes, Catalogs,   \n"
  436.                 "usw.                                                \n"
  437.                 "                                                    \n"
  438.                 "SCREENSHOT (40 KB)                                  \n"
  439.                 "                                                    \n"
  440.                 "Ein Screenshot von GoldED.                          \n"
  441.                 "                                                    \n"
  442.                 "NOTFALLPROGTRAMM (6 KB)                             \n"
  443.                 "                                                    \n"
  444.                 "Stellt nach Betriebssystemabstürzen den zuletzt     \n"
  445.                 "bearbeiteten Text wieder her.                       \n"
  446.             )
  447.         )
  448.  
  449.         (set #studio_components_golded     "GoldED")
  450.         (set #studio_components_starter    "Starter")
  451.         (set #studio_components_docs       "Dokumentation")
  452.         (set #studio_components_addons     "Add-Ons")
  453.         (set #studio_components_developer  "Entwicklerunterlagen")
  454.         (set #studio_components_screenshot "Screenshot")
  455.         (set #studio_components_recover    "Notfallprogramm")
  456.  
  457.         (set #studio_preset_install_A
  458.  
  459.             (cat
  460.  
  461.                 "Wählen Sie die Grundeinstellungen, die installiert  \n"
  462.                 "werden sollen (Seite 1 von 2):                      \n"
  463.             )
  464.         )
  465.  
  466.         (set #studio_preset_install_B
  467.  
  468.             (cat
  469.  
  470.                 "Wählen Sie die Grundeinstellungen, die installiert  \n"
  471.                 "werden sollen (Seite 2 von 2):                      \n"
  472.             )
  473.         )
  474.  
  475.         (set #studio_preset_install_help
  476.  
  477.             (cat
  478.  
  479.                 "Der Editor verwendet die Grundeinstellungen, wenn   \n"
  480.                 "normale Texte bearbeitet werden, für die kein       \n"
  481.                 "besonderer Dateityp definiert wurde.                \n"
  482.             )
  483.         )
  484.  
  485.         (set #studio_preset_display        "Anzeige")
  486.         (set #studio_preset_interface      "Benutzeroberfläche")
  487.         (set #studio_preset_hunter         "Dateisuche")
  488.         (set #studio_preset_printer        "Drucker")
  489.         (set #studio_preset_context        "Kontext")
  490.         (set #studio_preset_syntax         "Farbcodierung")
  491.         (set #studio_preset_layout         "Layout")
  492.         (set #studio_preset_mouse          "Maus")
  493.         (set #studio_preset_menu           "Menu")
  494.         (set #studio_preset_api            "Plug-Ins")
  495.         (set #studio_preset_project        "Projekte")
  496.         (set #studio_preset_references     "Referenzen")
  497.         (set #studio_preset_gadgets        "Symboleisten")
  498.         (set #studio_preset_tabs           "Tabulatoren")
  499.         (set #studio_preset_keyboard       "Tastatur")
  500.         (set #studio_preset_templates      "Templates")
  501.         (set #studio_preset_misc           "Verschiedenes")
  502.         (set #studio_preset_dictionary     "Wörterbücher")
  503.  
  504.         (set #studio_locale "Wählen Sie eine Sprache für die Grundeinstellungen:")
  505.  
  506.         (set #studio_locale_help
  507.  
  508.             (cat
  509.  
  510.                 "Die Berücksichtigung der vom Benutzer bevorzugten   \n"
  511.                 "Sprache bei der Beschriftung der Eingabefelder      \n"
  512.                 "erfolgt automatisch. Die Sprache der änderbaren     \n"
  513.                 "Komponenten (Einstellungen für Menus, Symbolleisten \n"
  514.                 "usw.) muß dagegen während der Installation gewählt  \n"
  515.                 "werden, damit die entsprechenden Konfigurationsdaten\n"
  516.                 "installiert werden können.                          \n"
  517.             )
  518.         )
  519.  
  520.         (set #studio_starter_help
  521.  
  522.             (cat
  523.  
  524.                 "SCHNELLSTARTER (5 KB)                               \n"
  525.                 "                                                    \n"
  526.                 "Das Startprogramm für den Editor: dieses Programm   \n"
  527.                 "kann wie ein normaler Editor verwendet werden,      \n"
  528.                 "bietet aber erweiterte Möglichkeiten, die sie beim  \n"
  529.                 "direkten Start von GoldED nicht haben. Der direkte  \n"
  530.                 "Start von GoldED sollte grundsätzlich vermieden     \n"
  531.                 "werden: verwenden Sie immer den Starter, um den     \n"
  532.                 "Editor zu starten.                                  \n"
  533.                 "                                                    \n"
  534.                 "DRAG & DROP STARTER (8 KB)                          \n"
  535.                 "                                                    \n"
  536.                 "Erzeugt ein Drag & Drop-Icon auf der Workbench: Sie \n"
  537.                 "können auf dieses Symbol klicken, um den Editor zu  \n"
  538.                 "starten oder Dateien auf dieses Symbol ziehen, um   \n"
  539.                 "sie im Editor zu öffnen.                            \n"
  540.             )
  541.         )
  542.  
  543.         (set #studio_starter_ed      "Schnellstarter")
  544.         (set #studio_starter_appicon "Drag & Drop-Starter")
  545.  
  546.         (set #studio_parts_install
  547.  
  548.             (cat
  549.  
  550.                 "                                                    \n"
  551.                 "Wählen Sie die Komponenten dieser Kategorie, die    \n"
  552.                 "installiert bzw. aktualisiert werden sollen:        \n"
  553.             )
  554.         )
  555.  
  556.         (set #studio_parts_install_a
  557.  
  558.             (cat
  559.  
  560.                 "                                                    \n"
  561.                 "Wählen Sie die Komponenten, die installiert bzw.    \n"
  562.                 "aktualisiert werden sollen (Seite 1 von 3):         \n"
  563.             )
  564.         )
  565.         (set #studio_parts_install_b
  566.  
  567.             (cat
  568.  
  569.                 "                                                    \n"
  570.                 "Wählen Sie die Komponenten, die installiert bzw.    \n"
  571.                 "aktualisiert werden sollen (Seite 2 von 3):         \n"
  572.             )
  573.         )
  574.  
  575.         (set #studio_parts_install_c
  576.  
  577.             (cat
  578.  
  579.                 "                                                    \n"
  580.                 "Wählen Sie die Komponenten, die installiert bzw.    \n"
  581.                 "aktualisiert werden sollen (Seite 3 von 3):         \n"
  582.             )
  583.         )
  584.  
  585.         (set #studio_parts_uninstall
  586.  
  587.             (cat
  588.  
  589.                 "                                                    \n"
  590.                 "Wählen Sie die Komponenten dieser Kategorie, die    \n"
  591.                 "entfernt werden sollen:                             \n"
  592.             )
  593.         )
  594.  
  595.         (set #studio_parts_uninstall_a
  596.  
  597.             (cat
  598.  
  599.                 "                                                    \n"
  600.                 "Wählen Sie die Komponenten dieser Kategorie, die    \n"
  601.                 "entfernt werden sollen (Seite 1 von 3):             \n"
  602.             )
  603.         )
  604.  
  605.         (set #studio_parts_uninstall_b
  606.  
  607.             (cat
  608.  
  609.                 "                                                    \n"
  610.                 "Wählen Sie die Komponenten dieser Kategorie, die    \n"
  611.                 "entfernt werden sollen (Seite 2 von 3):             \n"
  612.             )
  613.         )
  614.  
  615.         (set #studio_parts_uninstall_c
  616.  
  617.             (cat
  618.  
  619.                 "                                                    \n"
  620.                 "Wählen Sie die Komponenten dieser Kategorie, die    \n"
  621.                 "entfernt werden sollen (Seite 3 von 3):             \n"
  622.             )
  623.         )
  624.  
  625.         (set #studio_manual_help
  626.  
  627.             (cat
  628.  
  629.                 "HISTORY                                             \n"
  630.                 "                                                    \n"
  631.                 "Revisionsgeschichte (English)                       \n"
  632.                 "                                                    \n"
  633.                 "LIZENZ                                              \n"
  634.                 "                                                    \n"
  635.                 "Lizenzbedingungen.                                  \n"
  636.                 "                                                    \n"
  637.                 "BESTELLINFORMATIONEN                                \n"
  638.                 "                                                    \n"
  639.                 "Bezugsquellennachweis für Updates                   \n"
  640.                 "                                                    \n"
  641.                 "ENGLISCHE/DEUTSCHE DOKUMENTATION                    \n"
  642.                 "                                                    \n"
  643.                 "Online-Dokumentation im AmigaGuide-Format.          \n"
  644.             )
  645.         )
  646.  
  647.         (set #studio_manual_history  "History")
  648.         (set #studio_manual_licence  "Lizenz")
  649.         (set #studio_manual_order    "Bestellinformationen")
  650.         (set #studio_manual_english  "Englische Dokumentation")
  651.         (set #studio_manual_german   "Deutsche Dokumentation")
  652.  
  653.         (set #studio_registry
  654.  
  655.             (cat
  656.  
  657.                 "ACHTUNG: Beim Wiederherstellen dieser zentralen     \n"
  658.                 "Konfigurationsdatei verlieren Sie alle globalen     \n"
  659.                 "Einstellungen im Editor sowie weiterhin alle        \n"
  660.                 "Dateitypen mit Ausnahme des Dateityps TEXT !        \n"
  661.             )
  662.         )
  663.  
  664.         (set #studio_registry_restore "Wiederherstellen")
  665.         (set #studio_registry_keep    "Beibehalten")
  666.  
  667.         (set #studio_registry_help
  668.  
  669.             (cat
  670.  
  671.                 "Die zentrale Konfigurationsdatei (Registry) enthält \n"
  672.                 "alle dateitypunabhängigen globalen Einstellungen    \n"
  673.                 "inklusive der Dateitypliste.                        \n"
  674.             )
  675.         )
  676.  
  677.         (set #studio_nostartup "Die Datei s:user-startup fehlt oder ist beschädigt !\n")
  678.  
  679.         (set #startup_ask
  680.  
  681.             (cat
  682.  
  683.                 "Sollen die notwendigen Einträge in der Startup-Datei\n"
  684.                 "des Rechners jetzt erzeugt werden ?                 \n"
  685.             )
  686.         )
  687.  
  688.         (set #startup_ask_help
  689.  
  690.             (cat
  691.  
  692.                 "Es wird der notwendige Assign auf das Verzeichnis   \n"
  693.                 "des Editors eingerichtet.                           \n"
  694.             )
  695.         )
  696.  
  697.         (set #studio_addons_help
  698.  
  699.             (cat
  700.  
  701.                 "WEBWORLD                                            \n"
  702.                 "                                                    \n"
  703.                 "Erweiterung zur Bearbeitung von Internet-Seiten.    \n"
  704.                 "                                                    \n"
  705.                 "RECHTSCHREIBPRÜFUNG JOYCE                           \n"
  706.                 "                                                    \n"
  707.                 "Rechtschreibprüfung Deutsch/Englisch. Markiert die  \n"
  708.                 "Fehler im Text schon beim Schreiben. Belegt 2-4 MB  \n"
  709.                 "Speicher !                                          \n"
  710.                 "                                                    \n"
  711.                 "ROGET'S THESAURUS                                   \n"
  712.                 "                                                    \n"
  713.                 "Englisches Thesaurus: Umfangreiches Nachschlagewerk \n"
  714.                 "für Synonyme. Belegt 2 MB Speicher !                \n"
  715.                 "                                                    \n"
  716.                 "SCRIPTING                                           \n"
  717.                 "                                                    \n"
  718.                 "Unterstützung für die Bearbeitung der Startup-      \n"
  719.                 "Sequenz (Farbcodierung).                            \n"
  720.                 "                                                    \n"
  721.                 "AMIGAGUIDE PUBLISHER                                \n"
  722.                 "                                                    \n"
  723.                 "Erweiterung zur Bearbeitung von AmigaGuide-Dateien. \n"
  724.                 "                                                    \n"
  725.                 "SUPPORT FÜR STORMC                                  \n"
  726.                 "                                                    \n"
  727.                 "Umfangreicher Support für den StormC-Compiler: C/C++\n"
  728.                 "Farbhervorhebung, Toolbars, Anzeige der passenden   \n"
  729.                 "Klammer beim Schreiben, etc.                        \n"
  730.                 "                                                    \n"
  731.                 "SUPPORT FÜR SAS/C                                   \n"
  732.                 "                                                    \n"
  733.                 "Umfangreicher Support für den SAS/C-Compiler: C/C++ \n"
  734.                 "Farbhervorhebung, Toolbars, Anzeige der passenden   \n"
  735.                 "Klammer beim Schreiben, etc.                        \n"
  736.                 "                                                    \n"
  737.                 "SUPPORT FÜR ANDERE C-COMPILER                       \n"
  738.                 "                                                    \n"
  739.                 "Unterstützung für andere C-Compiler.                \n"
  740.                 "                                                    \n"
  741.                 "SUPPORT FÜR ASSEMBLER                               \n"
  742.                 "                                                    \n"
  743.                 "Unterstützung für die Bearbeitung von Assembler-    \n"
  744.                 "Quelltexten (Farbcodierung).                        \n"
  745.                 "                                                    \n"
  746.                 "FAXVERSAND                                          \n"
  747.                 "                                                    \n"
  748.                 "Aktuellen Text als Fax verschicken. Erfordert das   \n"
  749.                 "Faxprogramm STFax.                                  \n"
  750.                 "                                                    \n"
  751.                 "UNTERSTÜTZUNG FÜR MICRODOT                          \n"
  752.                 "                                                    \n"
  753.                 "Anpassung an Microdot zum Schreiben von E-Mails.    \n"
  754.                 "                                                    \n"
  755.                 "UNTERSTÜTZUNG FÜR THOR                              \n"
  756.                 "                                                    \n"
  757.                 "Anpassung an Thor zum Schreiben von E-Mails.        \n"
  758.                 "                                                    \n"
  759.                 "DRUCKERERWEITERUNG FÜR PCL-DRUCKER                  \n"
  760.                 "                                                    \n"
  761.                 "PCL-Druckprogramm. PCL ist dir Druckersprache, die  \n"
  762.                 "von den meisten Laserdruckern und den meisten HP    \n"
  763.                 "Tintenstrahldruckern verwendet wird (Geräte von     \n"
  764.                 "Epson und Canon sind i.d.R. keine PCL-Drucker).     \n"
  765.                 "                                                    \n"
  766.                 "INSTALLER-ASSISTENT                                 \n"
  767.                 "                                                    \n"
  768.                 "Diese Erweiterung erleichert das Erstellen von      \n"
  769.                 "Installationdateien für den Amiga Installer. Bei-   \n"
  770.                 "spielsweise werden zusammengehörende Klammern in    \n"
  771.                 "der gleichen Farbe dargestellt, so daß Fehler in    \n"
  772.                 "der Programmstruktur schnell zu finden sind.        \n"
  773.                 "                                                    \n"
  774.                 "ADD-ON WRAPPER                                      \n"
  775.                 "                                                    \n"
  776.                 "Dies ist ein Werkzeug für Entwickler, die Add-Ons   \n"
  777.                 "für GoldED erzeugen und vertreiben möchten.         \n"
  778.                 "                                                    \n"
  779.                 "TEXTREGISTER                                        \n"
  780.                 "                                                    \n"
  781.                 "Dieses Add-On erweitert Editorfenster um eine Knopf-\n"
  782.                 "leiste, die jeden geöffneten Text anzeigt.          \n"
  783.                 "                                                    \n"
  784.                 "MINESWEEPER                                         \n"
  785.                 "                                                    \n"
  786.                 "Ein kleines Spiel zum Zeitvertrieb in den Compiler- \n"
  787.                 "pausen.                                             \n"
  788.             )
  789.         )
  790.  
  791.         (set #studio_addons_envwww "Webworld")
  792.         (set #studio_addons_envjcy "Rechtschreibprüfung Joyce")
  793.         (set #studio_addons_envthe "Roget's Thesaurus")
  794.         (set #studio_addons_envbat "Scripting")
  795.         (set #studio_addons_envgde "AmigaGuide Publisher")
  796.         (set #studio_addons_envstm "Support für StormC")
  797.         (set #studio_addons_envsas "Support für SAS/C")
  798.         (set #studio_addons_envcpp "Support für andere C-Compiler")
  799.         (set #studio_addons_envasm "Support für Assembler")
  800.         (set #studio_addons_envfax "Faxversand")
  801.         (set #studio_addons_envmdt "Unterstützung für Microdot")
  802.         (set #studio_addons_envthr "Unterstützung für Thor")
  803.         (set #studio_addons_envprt "Druckererweiterung für PCL-Drucker")
  804.         (set #studio_addons_envrcs "Revisionskontrolle")
  805.         (set #studio_addons_envins "Installer-Assistent")
  806.         (set #studio_addons_envwrp "Add-On Wrapper")
  807.         (set #studio_addons_envreg "Textregister")
  808.         (set #studio_addons_envswp "Minesweeper")
  809.  
  810.         (set #studio_addons_install "Installation der Add-Ons ...")
  811.         (set #studio_addons_error   "Diese Add-On-Installation wurde abgebrochen und ist unvollständig !")
  812.  
  813.         (set #studio_ioerr "Lesefehler auf der Installations-CD !")
  814.     )
  815.  
  816.     ; english strings
  817.  
  818.     (
  819.         (set #studio_reboot "Please reboot the computer after installation !")
  820.  
  821.         (set #studio_cderr "File not fount. The CD-ROM file system installed on this computer is defective or incompatible. More information on this topic can be found in the FAQ file.")
  822.  
  823.         (set #studio_filenotfound "File not found.")
  824.  
  825.         (set #studio_demo
  826.  
  827.             (cat
  828.  
  829.                 "GoldED Studio may not be installed over the demo    \n"
  830.                 "version (and vice versa). Uninstall the demo version\n"
  831.                 "and repeat this installation or choose another      \n"
  832.                 "directory.                                          \n"
  833.             )
  834.         )
  835.  
  836.         (set #studio_rexxerr
  837.  
  838.             (cat
  839.  
  840.                 "Warning: ARexx Installation is incomplete. File not \n"
  841.                 "found error:                                        \n"
  842.                 "                                                    \n"
  843.             )
  844.         )
  845.  
  846.         (set #studio_overwrite
  847.  
  848.             (cat
  849.  
  850.                 "A drawer named Studio already exists in this path ! \n"
  851.                 "Continue with installation into this drawer ?       \n"
  852.             )
  853.         )
  854.  
  855.         (set #studio_overwrite_help
  856.  
  857.             (cat
  858.  
  859.                 "This drawer could belong to another program or to a \n"
  860.                 "previous incomplete installation.                   \n"
  861.             )
  862.         )
  863.  
  864.         (set #studio_overwrite_install "Install")
  865.  
  866.         (set #studio_overwrite_cancel  "Choose other path")
  867.  
  868.         (set #studio_badkick "This program requires AmigaOS 3 !")
  869.  
  870.         (set #studio_notify
  871.  
  872.             (cat
  873.  
  874.                 "An error has occured during the last installation.  \n"
  875.                 "We recommend to repeat a minimum installation to    \n"
  876.                 "another drawer.                                     \n"
  877.                 "                                                    \n"
  878.                 "Please terminate all other programs before you      \n"
  879.                 "repeat installation !                               \n"
  880.             )
  881.         )
  882.  
  883.         (set #studio_welcome
  884.  
  885.             (cat
  886.  
  887.                 "Welcome to the GoldED Studio Setup !                \n"
  888.                 "                                                    \n"
  889.                 "This program installs or updates GoldED Studio on   \n"
  890.                 "your computer.                                      \n"
  891.                 "                                                    \n"
  892.                 "We recommend to terminate all other programs before \n"
  893.                 "you continue with setup !                           \n"
  894.                 "                                                    \n"
  895.                 "WARNING: This software is protected by international\n"
  896.                 "and national laws. Unauthorized distribution or     \n"
  897.                 "rental of this software or one of its components are\n"
  898.                 "prosecuted to the full extent possible.             \n"
  899.             )
  900.         )
  901.  
  902.         (set #studio_installerr
  903.  
  904.             (cat
  905.  
  906.                 "An error has occured during the installation. An    \n"
  907.                 "error description can be found in the logfile (see  \n"
  908.                 "t: directory) if you did enable log file creation.  \n"
  909.                 "The error code is:                                  \n"
  910.                 "                                                    \n"
  911.             )
  912.         )
  913.  
  914.         (set #studio_yourname "Enter your name:")
  915.  
  916.         (set #studio_yourname_help
  917.  
  918.             (cat
  919.  
  920.                 "The name is required for product registration. The  \n"
  921.                 "software can not be installed without registration. \n"
  922.             )
  923.         )
  924.  
  925.         (set #studio_serial "Enter the serial code:")
  926.  
  927.         (set #studio_serial_help
  928.  
  929.             (cat
  930.  
  931.                 "You find the serial code on the registration card.  \n"
  932.                 "The code must be entered exactly as printed on the  \n"
  933.                 "registration card.                                  \n"
  934.             )
  935.         )
  936.  
  937.         (set #studio_check
  938.  
  939.             (cat
  940.  
  941.                 "Is this correct ?                                   \n"
  942.                 "                                                    \n"
  943.                 "%s, %s"
  944.             )
  945.         )
  946.  
  947.         (set #studio_check_continue "Accept")
  948.  
  949.         (set #studio_check_repeat "Modify")
  950.  
  951.         (set #studio_found
  952.  
  953.             (cat
  954.  
  955.                 "This software has been installed before:            \n"
  956.                 "                                                    \n"
  957.                 "Choose UPDATE to update, add or remove components   \n"
  958.                 "of the existing installation.                       \n"
  959.                 "                                                    \n"
  960.                 "Choose OTHER DIRECTORY to install again to another  \n"
  961.                 "directory.                                          \n"
  962.             )
  963.         )
  964.  
  965.         (set #studio_found_help
  966.  
  967.             (cat
  968.  
  969.                 "UPDATE                                              \n"
  970.                 "                                                    \n"
  971.                 "Updates the existing installation: update, add or   \n"
  972.                 "remove its components.                              \n"
  973.                 "                                                    \n"
  974.                 "OTHER DIRECTORY                                     \n"
  975.                 "                                                    \n"
  976.                 "Repeat installation to another directory. Your old  \n"
  977.                 "installation remains unchanged. You shouldn't use   \n"
  978.                 "this installation type unless you have problems with\n"
  979.                 "your existing installation.                         \n"
  980.             )
  981.         )
  982.  
  983.         (set #studio_found_confirm "Update")
  984.  
  985.         (set #studio_found_newinstall "Other directory")
  986.  
  987.         (set #studio_path_choose
  988.  
  989.             (cat
  990.  
  991.                 "Choose a path for installation. The setup program   \n"
  992.                 "will create a directory for GoldED Studio in the    \n"
  993.                 "path you specify:                                   \n"
  994.             )
  995.         )
  996.  
  997.         (set #studio_path_choose_help
  998.  
  999.             (cat
  1000.  
  1001.                 "Disk space requirements on the choosen drive depend \n"
  1002.                 "on the further installation process. About 30 MB are\n"
  1003.                 "required for a full installation.                   \n"
  1004.                 "                                                    \n"
  1005.                 "Installation over an existing GoldED 3 or GoldED 4  \n"
  1006.                 "setup is not possible. You can load old settings    \n"
  1007.                 "after installation since version 5 is backwards     \n"
  1008.                 "compatible with GoldED 4 configuration files.       \n"
  1009.             )
  1010.         )
  1011.  
  1012.         (set #studio_installtype "Choose the installation type:")
  1013.  
  1014.         (set #studio_installtype_help
  1015.  
  1016.             (cat
  1017.  
  1018.                 "You can add or remove components after installation \n"
  1019.                 "by running the setup program again.                 \n"
  1020.             )
  1021.         )
  1022.  
  1023.         (set #studio_installtype_minimum "Minimum installation (500 KB)")
  1024.         (set #studio_installtype_user    "User defined (up to 25 MB)")
  1025.         (set #studio_installtype_normal  "Typical installation (2 MB)")
  1026.  
  1027.         (set #studio_checking "Examining existing installation ...")
  1028.  
  1029.         (set #studio_updatemode_reinstall "Upgrade current installation")
  1030.         (set #studio_updatemode_add       "Add components")
  1031.         (set #studio_updatemode_remove    "Remove components")
  1032.         (set #studio_updatemode_presets   "Install default configuration")
  1033.         (set #studio_updatemode_registry  "Restore registry")
  1034.         (set #studio_updatemode_startup   "Fix user startup sequence")
  1035.         (set #studio_updatemode_exit      "Leave setup")
  1036.  
  1037.         (set #studio_updatemode_help
  1038.  
  1039.             (cat
  1040.  
  1041.                 "UPGRADE CURRENT INSTALLATION                        \n"
  1042.                 "                                                    \n"
  1043.                 "Installed components with exception of configuration\n"
  1044.                 "files are reinstalled.                              \n"
  1045.                 "                                                    \n"
  1046.                 "ADD/REMOVE COMPONENTS                               \n"
  1047.                 "                                                    \n"
  1048.                 "Modifies the current installation by adding or      \n"
  1049.                 "removing components (add-ons, manuals, etc.).       \n"
  1050.                 "                                                    \n"
  1051.                 "INSTALL DEFAULT CONFIGURATION                       \n"
  1052.                 "                                                    \n"
  1053.                 "Select the default configuration elements you would \n"
  1054.                 "like to see reinstalled (menu, colors, etc.). The   \n"
  1055.                 "editor uses the default configuration whenever you  \n"
  1056.                 "load a text which has no specific file type         \n"
  1057.                 "associated with it.                                 \n"
  1058.                 "                                                    \n"
  1059.                 "RESTORE REGISTRY                                    \n"
  1060.                 "                                                    \n"
  1061.                 "Reinstalls the central configuration file. You'll   \n"
  1062.                 "loose all global settings and all filetypes with    \n"
  1063.                 "exception of the type TEXT if you restore the       \n"
  1064.                 "registry !                                          \n"
  1065.                 "                                                    \n"
  1066.                 "FIX USER-STARTUP SEQUENCE                           \n"
  1067.                 "                                                    \n"
  1068.                 "Adds the assign required by this sofwtare to the    \n"
  1069.                 "user startup sequence of your system.               \n"
  1070.             )
  1071.  
  1072.         )
  1073.  
  1074.         (set #studio_components_install
  1075.  
  1076.             (cat
  1077.  
  1078.                 "Choose the categories to be installed:              \n"
  1079.             )
  1080.         )
  1081.  
  1082.         (set #studio_components_update
  1083.  
  1084.             (cat
  1085.  
  1086.                 "Choose the categories to be updated or installed:   \n"
  1087.             )
  1088.         )
  1089.  
  1090.         (set #studio_components_remove
  1091.  
  1092.             (cat
  1093.  
  1094.                 "Choose the categories to be removed completely or   \n"
  1095.                 "in parts:                                           \n"
  1096.             )
  1097.         )
  1098.  
  1099.         (set #studio_components_help
  1100.  
  1101.             (cat
  1102.  
  1103.                 "GOLDED (1.76 MB)                                    \n"
  1104.                 "                                                    \n"
  1105.                 "The editor GoldED and the files and directories     \n"
  1106.                 "required by GoldED.                                 \n"
  1107.                 "                                                    \n"
  1108.                 "STARTER (0 - 15 KB)                                 \n"
  1109.                 "                                                    \n"
  1110.                 "Starter programs which simplify usage of the editor \n"
  1111.                 "(Drag & Drop).                                      \n"
  1112.                 "                                                    \n"
  1113.                 "DOCUMENTATION (36 K - 700 KB)                       \n"
  1114.                 "                                                    \n"
  1115.                 "Online documentation.                               \n"
  1116.                 "                                                    \n"
  1117.                 "ADD-ONS (0 - 25 MB)                                 \n"
  1118.                 "                                                    \n"
  1119.                 "Includes the spell checking module Joyce, Roget's   \n"
  1120.                 "thesaurus, support for various C compilers, the     \n"
  1121.                 "HTML environment Webworld (for writing HTML files   \n"
  1122.                 "with the editor), support for various e-mailer,     \n"
  1123.                 "etc.                                                \n"
  1124.                 "                                                    \n"
  1125.                 "DSEVELOPER MATERIAL (830 KB)                        \n"
  1126.                 "                                                    \n"
  1127.                 "Material for developing extensions for GoldED:      \n"
  1128.                 "source codes, autodocs, includes, catalogs, etc.    \n"
  1129.                 "                                                    \n"
  1130.                 "SCREENSHOT (40 KB)                                  \n"
  1131.                 "                                                    \n"
  1132.                 "A screenshot of GoldED.                             \n"
  1133.                 "                                                    \n"
  1134.                 "EMERGENCY RECOVERY (6 KB)                           \n"
  1135.                 "                                                    \n"
  1136.                 "Restores a text lost during a system crash.         \n"
  1137.             )
  1138.         )
  1139.  
  1140.         (set #studio_components_golded     "GoldED")
  1141.         (set #studio_components_starter    "Starter")
  1142.         (set #studio_components_docs       "Documentation")
  1143.         (set #studio_components_addons     "Add-Ons")
  1144.         (set #studio_components_developer  "Developer material")
  1145.         (set #studio_components_screenshot "Screenshot")
  1146.         (set #studio_components_recover    "Emergency Recovery")
  1147.  
  1148.         (set #studio_preset_install_A
  1149.  
  1150.             (cat
  1151.  
  1152.                 "Chose the default configuration elements you would  \n"
  1153.                 "like to have installed (page 1 of 2):               \n"
  1154.             )
  1155.         )
  1156.  
  1157.         (set #studio_preset_install_B
  1158.  
  1159.             (cat
  1160.  
  1161.                 "Chose the default configuration elements you would  \n"
  1162.                 "like to have installed (page 2 of 2):               \n"
  1163.             )
  1164.         )
  1165.  
  1166.         (set #studio_preset_install_help
  1167.  
  1168.             (cat
  1169.  
  1170.                 "The editor uses the default configuration whenever  \n"
  1171.                 "you load a text which has no specific file type     \n"
  1172.                 "associated with it.                                 \n"
  1173.             )
  1174.         )
  1175.  
  1176.         (set #studio_preset_display        "Display configuration")
  1177.         (set #studio_preset_interface      "User interface")
  1178.         (set #studio_preset_hunter         "File search")
  1179.         (set #studio_preset_printer        "Printer configuration")
  1180.         (set #studio_preset_context        "Context")
  1181.         (set #studio_preset_syntax         "Syntax highlighting")
  1182.         (set #studio_preset_layout         "Formatting")
  1183.         (set #studio_preset_mouse          "Mouse")
  1184.         (set #studio_preset_menu           "Menu")
  1185.         (set #studio_preset_api            "Plug-Ins")
  1186.         (set #studio_preset_project        "Projects")
  1187.         (set #studio_preset_references     "References")
  1188.         (set #studio_preset_gadgets        "Toolbars")
  1189.         (set #studio_preset_tabs           "Tabs")
  1190.         (set #studio_preset_keyboard       "Keyboard")
  1191.         (set #studio_preset_templates      "Templates")
  1192.         (set #studio_preset_misc           "Miscellaneous")
  1193.         (set #studio_preset_dictionary     "Dictionaries")
  1194.  
  1195.         (set #studio_locale "Choose a language for the default configuration:")
  1196.  
  1197.         (set #studio_locale_help
  1198.  
  1199.             (cat
  1200.  
  1201.                 "While gadget labels are localized automatically, the\n"
  1202.                 "language for configurable elements (configuration of\n"
  1203.                 "menus, toolbars, etc.) has to be choosen during the \n"
  1204.                 "setup so that the correct files can be installed.   \n"
  1205.             )
  1206.         )
  1207.  
  1208.         (set #studio_starter_help
  1209.  
  1210.             (cat
  1211.  
  1212.                 "QUICK STARTER (5 KB)                                \n"
  1213.                 "                                                    \n"
  1214.                 "The starter for the editor: while this program can  \n"
  1215.                 "be use like a normal editor (GoldED), it offers you \n"
  1216.                 "features not available when running GoldED directly;\n"
  1217.                 "you should in fact avoid running GoldED directly and\n"
  1218.                 "always use the starter.                             \n"
  1219.                 "                                                    \n"
  1220.                 "DRAG & DROP STARTER (8 KB)                          \n"
  1221.                 "                                                    \n"
  1222.                 "Creates a drag and drop icon on your workbench where\n"
  1223.                 "you can drag files to open them in the editor.      \n"
  1224.             )
  1225.         )
  1226.  
  1227.         (set #studio_starter_ed      "Quick Starter")
  1228.         (set #studio_starter_appicon "Drag & Drop Starter")
  1229.  
  1230.         (set #studio_parts_install
  1231.  
  1232.             (cat
  1233.  
  1234.                 "                                                    \n"
  1235.                 "Choose the components of this category to be        \n"
  1236.                 "installed or updated:                               \n"
  1237.             )
  1238.         )
  1239.  
  1240.         (set #studio_parts_install_a
  1241.  
  1242.             (cat
  1243.  
  1244.                 "                                                    \n"
  1245.                 "Choose the components of this category to be        \n"
  1246.                 "installed or updated (page 1 of 3):                 \n"
  1247.             )
  1248.         )
  1249.  
  1250.         (set #studio_parts_install_b
  1251.  
  1252.             (cat
  1253.  
  1254.                 "                                                    \n"
  1255.                 "Choose the components of this category to be        \n"
  1256.                 "installed or updated (page 2 of 3):                 \n"
  1257.             )
  1258.         )
  1259.  
  1260.         (set #studio_parts_install_c
  1261.  
  1262.             (cat
  1263.  
  1264.                 "                                                    \n"
  1265.                 "Choose the components of this category to be        \n"
  1266.                 "installed or updated (page 3 of 3):                 \n"
  1267.             )
  1268.         )
  1269.  
  1270.         (set #studio_parts_uninstall
  1271.  
  1272.             (cat
  1273.  
  1274.                 "                                                    \n"
  1275.                 "Choose the components of this category to be        \n"
  1276.                 "removed:                                            \n"
  1277.             )
  1278.         )
  1279.  
  1280.         (set #studio_parts_uninstall_a
  1281.  
  1282.             (cat
  1283.  
  1284.                 "                                                    \n"
  1285.                 "Choose the components of this category to be        \n"
  1286.                 "removed (page 1 of 3):                              \n"
  1287.             )
  1288.         )
  1289.  
  1290.         (set #studio_parts_uninstall_b
  1291.  
  1292.             (cat
  1293.  
  1294.                 "                                                    \n"
  1295.                 "Choose the components of this category to be        \n"
  1296.                 "removed (page 2 of 3):                              \n"
  1297.             )
  1298.         )
  1299.  
  1300.         (set #studio_parts_uninstall_c
  1301.  
  1302.             (cat
  1303.  
  1304.                 "                                                    \n"
  1305.                 "Choose the components of this category to be        \n"
  1306.                 "removed (page 3 of 3):                              \n"
  1307.             )
  1308.         )
  1309.  
  1310.         (set #studio_manual_help
  1311.  
  1312.             (cat
  1313.  
  1314.                 "HISTORY                                             \n"
  1315.                 "                                                    \n"
  1316.                 "Revision history                                    \n"
  1317.                 "                                                    \n"
  1318.                 "LICENCE                                             \n"
  1319.                 "                                                    \n"
  1320.                 "User licence                                        \n"
  1321.                 "                                                    \n"
  1322.                 "ORDERING INFORMATION                                \n"
  1323.                 "                                                    \n"
  1324.                 "Information for ordering updates                    \n"
  1325.                 "                                                    \n"
  1326.                 "ENGLISH/GERMAN DOCUMENTATION                        \n"
  1327.                 "                                                    \n"
  1328.                 "Online documentation in AmigaGuide format.          \n"
  1329.             )
  1330.         )
  1331.  
  1332.         (set #studio_manual_history  "History")
  1333.         (set #studio_manual_licence  "Licence")
  1334.         (set #studio_manual_order    "Ordering information")
  1335.         (set #studio_manual_english  "English documentation")
  1336.         (set #studio_manual_german   "German documentation")
  1337.  
  1338.         (set #studio_registry
  1339.  
  1340.             (cat
  1341.  
  1342.                 "WARNING: You will loose all global configuration    \n"
  1343.                 "settings and all file types with exception of the   \n"
  1344.                 "type TEXT if you restore the registry !             \n"
  1345.             )
  1346.         )
  1347.  
  1348.         (set #studio_registry_restore "Restore registry")
  1349.         (set #studio_registry_keep    "Skip this step")
  1350.  
  1351.         (set #studio_registry_help
  1352.  
  1353.             (cat
  1354.  
  1355.                 "The central configuration file (registry) contains  \n"
  1356.                 "all file type independent configuration settings    \n"
  1357.                 "including the global list of file types.            \n"
  1358.             )
  1359.         )
  1360.  
  1361.         (set #studio_nostartup "The file s:user-startup is missing or corrupt !\n")
  1362.  
  1363.         (set #startup_ask
  1364.  
  1365.             (cat
  1366.  
  1367.                 "Should the changes to the system's user startup     \n"
  1368.                 "sequence (as required by this software) be done     \n"
  1369.                 "now ?                                               \n"
  1370.             )
  1371.         )
  1372.  
  1373.         (set #startup_ask_help
  1374.  
  1375.             (cat
  1376.  
  1377.                 "This will add an assign pointing to the installation\n"
  1378.                 "directory.                                          \n"
  1379.             )
  1380.         )
  1381.  
  1382.         (set #studio_addons_help
  1383.  
  1384.             (cat
  1385.  
  1386.                 "WEBWORLD                                            \n"
  1387.                 "                                                    \n"
  1388.                 "Add-On for publishing internet (HTML) documents.    \n"
  1389.                 "                                                    \n"
  1390.                 "JOYCE SPELL CHECKING                                \n"
  1391.                 "                                                    \n"
  1392.                 "Spellchecking for English and German. Highlights    \n"
  1393.                 "spelling errors in a text while you are typing.     \n"
  1394.                 "Requires 2-4 MB RAM !                               \n"
  1395.                 "                                                    \n"
  1396.                 "ROGET'S THESAURUS                                   \n"
  1397.                 "                                                    \n"
  1398.                 "English thesaurus: lists synonyms from a 100000     \n"
  1399.                 "words database. Requires 2 MB RAM !                 \n"
  1400.                 "                                                    \n"
  1401.                 "SCRIPTING                                           \n"
  1402.                 "                                                    \n"
  1403.                 "Support for editing the startup sequence (syntax    \n"
  1404.                 "highlighting).                                      \n"
  1405.                 "                                                    \n"
  1406.                 "AMIGAGUIDE PUBLISHER                                \n"
  1407.                 "                                                    \n"
  1408.                 "Add-On for publishing AmigaGuide documents.         \n"
  1409.                 "                                                    \n"
  1410.                 "SUPPORT FOR STORMC                                  \n"
  1411.                 "                                                    \n"
  1412.                 "Support for the StormC compiler: C/C++ syntax       \n"
  1413.                 "highlighting, toolbars, shows the matching bracket  \n"
  1414.                 "while typing, etc.                                  \n"
  1415.                 "                                                    \n"
  1416.                 "SUPPORT FOR SAS/C                                   \n"
  1417.                 "                                                    \n"
  1418.                 "Support for the StormC compiler: C/C++ syntax       \n"
  1419.                 "highlighting, toolbars, shows the matching bracket  \n"
  1420.                 "while typing, etc.                                  \n"
  1421.                 "                                                    \n"
  1422.                 "SUPPORT FOR OTHER C COMPILERS                       \n"
  1423.                 "                                                    \n"
  1424.                 "C++ syntax highlighting and other extensions.       \n"
  1425.                 "                                                    \n"
  1426.                 "SUPPORT FOR ASSEMBLER                               \n"
  1427.                 "                                                    \n"
  1428.                 "Support for editing assembler source codes.         \n"
  1429.                 "                                                    \n"
  1430.                 "FAX                                                 \n"
  1431.                 "                                                    \n"
  1432.                 "Sends current text as FAX. Requires the fax program \n"
  1433.                 "STFax.                                              \n"
  1434.                 "                                                    \n"
  1435.                 "SUPPORT FOR MICRODOT                                \n"
  1436.                 "                                                    \n"
  1437.                 "Support for writing e-mails with Microdot (syntax   \n"
  1438.                 "highlighting and signature support).                \n"
  1439.                 "                                                    \n"
  1440.                 "SUPPORT FOR THOR                                    \n"
  1441.                 "                                                    \n"
  1442.                 "Support for writing e-mails with Thor (syntax       \n"
  1443.                 "highlighting and signature support).                \n"
  1444.                 "                                                    \n"
  1445.                 "PCL PRINTING UTILITY                                \n"
  1446.                 "                                                    \n"
  1447.                 "A printing utility for PCL printers. PCL is the     \n"
  1448.                 "printer command language used by most laser printers\n"
  1449.                 "and most HP (but not Epson or Canon) inkjets.       \n"
  1450.                 "                                                    \n"
  1451.                 "INSTALLER WIZARD                                    \n"
  1452.                 "                                                    \n"
  1453.                 "This add-on simplifies the creation of installer    \n"
  1454.                 "scripts compatible with the Amiga Installer. For    \n"
  1455.                 "example, matching brackets have the same color so   \n"
  1456.                 "that nesting errors can be found quickly.           \n"
  1457.                 "                                                    \n"
  1458.                 "ADD-ON WRAPPER                                      \n"
  1459.                 "                                                    \n"
  1460.                 "The Add-On Wrapper is a tool for developers who wish\n"
  1461.                 "to create and distribute add-ons for GoldED.        \n"
  1462.                 "                                                    \n"
  1463.                 "TEXT REGISTER                                       \n"
  1464.                 "                                                    \n"
  1465.                 "This add-on adds a button stripe to editor windows, \n"
  1466.                 "one button for each open text. Click on one of these\n"
  1467.                 "buttons to bring the associated text to the front.  \n"
  1468.                 "                                                    \n"
  1469.                 "MINESWEEPER                                         \n"
  1470.                 "                                                    \n"
  1471.                 "The error messages of the compiler no longer provide\n"
  1472.                 "sufficient thrill for you ? Well, now you have the  \n"
  1473.                 "Minesweeper game to kill some time.                 \n"
  1474.             )
  1475.         )
  1476.  
  1477.         (set #studio_addons_envwww "Webworld")
  1478.         (set #studio_addons_envjcy "Joyce Spell Checking")
  1479.         (set #studio_addons_envthe "Roget's Thesaurus")
  1480.         (set #studio_addons_envbat "Scripting")
  1481.         (set #studio_addons_envgde "AmigaGuide Publisher")
  1482.         (set #studio_addons_envstm "Support for StormC")
  1483.         (set #studio_addons_envsas "Support for SAS/C")
  1484.         (set #studio_addons_envcpp "Support for other C compilers")
  1485.         (set #studio_addons_envasm "Support for Assembler")
  1486.         (set #studio_addons_envfax "Fax")
  1487.         (set #studio_addons_envmdt "Support for Microdot")
  1488.         (set #studio_addons_envthr "Support for Thor")
  1489.         (set #studio_addons_envprt "PCL printing utility")
  1490.         (set #studio_addons_envrcs "Revision control system")
  1491.         (set #studio_addons_envins "Installer Wizard")
  1492.         (set #studio_addons_envwrp "Add-On Wrapper")
  1493.         (set #studio_addons_envreg "Text Register")
  1494.         (set #studio_addons_envswp "Minesweeper")
  1495.  
  1496.         (set #studio_addons_install "Installation of Add-Ons ...")
  1497.         (set #studio_addons_error   "This add-on installation has been aborted and is incomplete !")
  1498.  
  1499.         (set #studio_ioerr "Read error on installation CD !")
  1500.     )
  1501. )
  1502.  
  1503. ; -------------------------------- check environment ---------------------------
  1504.  
  1505. ; check if we are running under OS 3
  1506.  
  1507. (if (< (/ (getversion) 65536) 39)
  1508.  
  1509.     (
  1510.         (delete "env:studioinstall")
  1511.  
  1512.         (textfile
  1513.  
  1514.             (dest "env:studioinstall")
  1515.  
  1516.             (append "ERROR")
  1517.         )
  1518.  
  1519.         (abort #studio_badkick)
  1520.     )
  1521. )
  1522.  
  1523. ; check CD ROM file system
  1524.  
  1525. (if (not (and (exists "installdata/cpu") (exists "installdata/golded") (exists "installdata/programs")))
  1526.  
  1527.     (
  1528.         (delete "env:studioinstall")
  1529.  
  1530.         (textfile
  1531.  
  1532.             (dest "env:studioinstall")
  1533.  
  1534.             (append "ERROR")
  1535.         )
  1536.  
  1537.         (abort #studio_cderr)
  1538.     )
  1539. )
  1540.  
  1541. (if (not (exists "sys:system/rexxmast"))
  1542.  
  1543.     (message (cat #studio_rexxerr "sys:system/rexxmast"))
  1544. )
  1545.  
  1546. (if (not (exists "libs:rexxsyslib.library"))
  1547.  
  1548.     (message (cat #studio_rexxerr "libs:rexxsyslib.library"))
  1549. )
  1550.  
  1551. ; --------------------------------- procedures ---------------------------------
  1552.  
  1553. ; uninstall an add-on (input: <studio_installpath>)
  1554.  
  1555. (procedure studio_proc_uninstall
  1556.  
  1557.     (
  1558.         (set studio_installcmd ("setup path \"%s\" icon \"%s\"" (pathonly studio_installpath) (fileonly studio_installpath)))
  1559.  
  1560.         ; request uninstall and run add-on setup
  1561.  
  1562.         (delete "env:installoptions")
  1563.  
  1564.         (textfile
  1565.  
  1566.             (dest "env:installoptions")
  1567.  
  1568.             (append "UNINSTALL")
  1569.         )
  1570.  
  1571.         (run studio_installcmd)
  1572.     )
  1573. )
  1574.  
  1575. ; install an add-on (input: <studio_installpath>)
  1576.  
  1577. (procedure studio_proc_install
  1578.  
  1579.     (
  1580.         (set studio_installcmd ("setup path \"%s\" icon \"%s\"" (pathonly studio_installpath) (fileonly studio_installpath)))
  1581.  
  1582.         ; set quiet mode
  1583.  
  1584.         (working #studio_addons_install)
  1585.  
  1586.         (delete "env:installoptions")
  1587.  
  1588.         (textfile
  1589.  
  1590.             (dest "env:installoptions")
  1591.  
  1592.             (append "INSTALLQUIET")
  1593.         )
  1594.  
  1595.         (run studio_installcmd)
  1596.  
  1597.         ; check return code of installation
  1598.  
  1599.         (if (exists "env:componentinstall")
  1600.  
  1601.             (set studio_installcode (getenv "componentinstall"))
  1602.  
  1603.             (set studio_installcode "ERROR")
  1604.         )
  1605.  
  1606.         (if (<> studio_installcode "OK")
  1607.  
  1608.             (message #studio_addons_error)
  1609.         )
  1610.     )
  1611. )
  1612.  
  1613. ; edit startup sequence
  1614.  
  1615. (procedure studio_proc_startup
  1616.  
  1617.     (
  1618.         (if (exists "s:user-startup")
  1619.  
  1620.             (
  1621.                 ; remove entries from previous installation
  1622.  
  1623.                 (run "installdata/programs/stripstartup >NIL: LINES=6 SECTIONNAME=HiSpeed")
  1624.  
  1625.                 (run "installdata/programs/stripstartup >NIL: LINES=6 SECTIONNAME=GED_quick")
  1626.             )
  1627.  
  1628.             (message #studio_nostartup)
  1629.         )
  1630.  
  1631.         (startup "GoldED"
  1632.  
  1633.             (prompt #startup_ask)
  1634.  
  1635.             (help #startup_ask_help)
  1636.  
  1637.             (command
  1638.  
  1639.                 ("assign golded: \"%s\"\n" (expandpath "golded:"))
  1640.  
  1641.                 ("assign libs:   \"%s\" add\n" (tackon (expandpath "golded:") "etc/libs"))
  1642.  
  1643.                 ("assign fonts:  \"%s\" add\n" (tackon (expandpath "golded:") "etc/fonts"))
  1644.             )
  1645.         )
  1646.     )
  1647. )
  1648.  
  1649. ; restore registry (input: none)
  1650.  
  1651. (procedure studio_proc_registry
  1652.  
  1653.     (
  1654.         (if (exists "golded:etc/registry/registry")
  1655.  
  1656.             (set studio_registry
  1657.  
  1658.                 (askbool
  1659.  
  1660.                     (prompt #studio_registry)
  1661.  
  1662.                     (choices
  1663.  
  1664.                         #studio_registry_restore
  1665.                         #studio_registry_keep
  1666.                     )
  1667.  
  1668.                     (help #studio_registry_help)
  1669.                 )
  1670.             )
  1671.  
  1672.             (set studio_registry 1)
  1673.         )
  1674.  
  1675.         (if (= studio_registry 1)
  1676.  
  1677.             (
  1678.                 (copyfiles
  1679.  
  1680.                     (source "installdata/registry/registry")
  1681.  
  1682.                     (dest "golded:etc/registry")
  1683.                 )
  1684.  
  1685.                 ; remove write protection for material copied from CD-ROM
  1686.  
  1687.                 (run "installdata/programs/unprotect basedir=golded:etc/registry")
  1688.  
  1689.                 ; save install path and serial code in registry
  1690.  
  1691.                 (run ("golded:add-ons/regedit/regedit SERIAL=\"%s\" INSTALLPATH=\"%s\"" studio_serial (expandpath "")))
  1692.             )
  1693.         )
  1694.     )
  1695. )
  1696.  
  1697. ; cleanup after installation (input: none)
  1698.  
  1699. (procedure studio_proc_cleanup
  1700.  
  1701.     (
  1702.         (delete "env:componentinstall")
  1703.  
  1704.         (delete "env:installoptions")
  1705.     )
  1706. )
  1707.  
  1708. ; save configuration (input: <studio_yourname>, <studio_language>, <studio_serial>)
  1709.  
  1710. (procedure studio_proc_savecfg
  1711.  
  1712.     (if (exists "golded:etc/env" (noreq))
  1713.  
  1714.         (
  1715.             (delete "golded:etc/env/name")
  1716.  
  1717.             (textfile
  1718.  
  1719.                 (dest "golded:etc/env/name")
  1720.  
  1721.                 (append studio_yourname)
  1722.             )
  1723.  
  1724.             (delete "golded:etc/env/language")
  1725.  
  1726.             (textfile
  1727.  
  1728.                 (dest "golded:etc/env/language")
  1729.  
  1730.                 (append studio_language)
  1731.             )
  1732.  
  1733.             (delete "golded:etc/env/serial")
  1734.  
  1735.             (textfile
  1736.  
  1737.                 (dest "golded:etc/env/serial")
  1738.  
  1739.                 (append studio_serial)
  1740.             )
  1741.         )
  1742.     )
  1743. )
  1744.  
  1745. ; select subcomponents for installation (input: <studio_components>, output: <studio_starter>, <studio_manual>)
  1746.  
  1747. (procedure studio_proc_chooseparts
  1748.  
  1749.     (
  1750.         ; choose add-ons
  1751.  
  1752.         (if (bitand studio_components @studio_components_addons)
  1753.  
  1754.             (
  1755.                 (set studio_addons_a
  1756.  
  1757.                     (askoptions
  1758.  
  1759.                         (prompt (cat #studio_components_addons #studio_parts_install_a))
  1760.  
  1761.                         (help #studio_addons_help)
  1762.  
  1763.                         (choices
  1764.  
  1765.                             #studio_addons_envwww
  1766.                             #studio_addons_envgde
  1767.                             #studio_addons_envthe
  1768.                             #studio_addons_envcpp
  1769.                             #studio_addons_envstm
  1770.                             #studio_addons_envsas
  1771.                         )   
  1772.  
  1773.                         (default studio_addons_a)
  1774.                     )
  1775.                 )
  1776.  
  1777.                 (set studio_addons_b
  1778.  
  1779.                     (askoptions
  1780.  
  1781.                         (prompt (cat #studio_components_addons #studio_parts_install_b))
  1782.  
  1783.                         (help #studio_addons_help)
  1784.  
  1785.                         (choices
  1786.  
  1787.                             #studio_addons_envasm
  1788.                             #studio_addons_envbat
  1789.                             #studio_addons_envfax
  1790.                             #studio_addons_envmdt
  1791.                             #studio_addons_envthr
  1792.                             #studio_addons_envjcy
  1793.                         )   
  1794.  
  1795.                         (default studio_addons_b)
  1796.                     )
  1797.                 )
  1798.  
  1799.                 (set studio_addons_c
  1800.  
  1801.                     (askoptions
  1802.  
  1803.                         (prompt (cat #studio_components_addons #studio_parts_install_c))
  1804.  
  1805.                         (help #studio_addons_help)
  1806.  
  1807.                         (choices
  1808.  
  1809.                             #studio_addons_envprt
  1810.                             #studio_addons_envrcs
  1811.                             #studio_addons_envins
  1812.                             #studio_addons_envwrp
  1813.                             #studio_addons_envreg
  1814.                             #studio_addons_envswp
  1815.                         )   
  1816.  
  1817.                         (default studio_addons_c)
  1818.                     )
  1819.                 )
  1820.             )
  1821.         )
  1822.  
  1823.         ; choose starter(s)
  1824.  
  1825.         (if (bitand studio_components @studio_components_starter)
  1826.  
  1827.             (
  1828.                 (set studio_starter
  1829.  
  1830.                     (askoptions
  1831.  
  1832.                         (prompt (cat #studio_components_starter #studio_parts_install))
  1833.  
  1834.                         (help #studio_starter_help)
  1835.  
  1836.                         (choices
  1837.  
  1838.                             #studio_starter_ed
  1839.                             #studio_starter_appicon
  1840.                         )
  1841.  
  1842.                         (default studio_starter)
  1843.                     )
  1844.                 )
  1845.             )
  1846.         )
  1847.  
  1848.         ; choose documentation
  1849.  
  1850.         (if (bitand studio_components @studio_components_docs)
  1851.  
  1852.             (
  1853.                 (set studio_manual
  1854.  
  1855.                     (askoptions
  1856.  
  1857.                         (prompt (cat #studio_components_docs #studio_parts_install))
  1858.  
  1859.                         (help #studio_manual_help)
  1860.  
  1861.                         (choices
  1862.  
  1863.                             #studio_manual_history
  1864.                             #studio_manual_licence
  1865.                             #studio_manual_order
  1866.                             #studio_manual_english
  1867.                             #studio_manual_german
  1868.                         )   
  1869.  
  1870.                         (default studio_manual)
  1871.                     )
  1872.                 )
  1873.             )
  1874.         )
  1875.     )
  1876. )
  1877.  
  1878. ; select subcomponents for removal (input: studio_remove, output: <studio_removeaddons_a>, <studio_removeaddons_b>, <studio_removestarter>, <studio_removemanual>)
  1879.  
  1880. (procedure studio_proc_removeparts
  1881.  
  1882.     (
  1883.         ; remove add-ons
  1884.  
  1885.         (if (bitand studio_remove @studio_components_addons)
  1886.  
  1887.             (
  1888.                 (set studio_removeaddons_a
  1889.  
  1890.                     (askoptions
  1891.  
  1892.                         (prompt (cat #studio_components_addons #studio_parts_uninstall_a))
  1893.  
  1894.                         (help #studio_addons_help)
  1895.  
  1896.                         (choices
  1897.  
  1898.                             #studio_addons_envwww
  1899.                             #studio_addons_envgde
  1900.                             #studio_addons_envthe
  1901.                             #studio_addons_envcpp
  1902.                             #studio_addons_envstm
  1903.                             #studio_addons_envsas
  1904.                         )   
  1905.  
  1906.                         (default 0)
  1907.                     )
  1908.                 )
  1909.  
  1910.                 (set studio_removeaddons_b
  1911.  
  1912.                     (askoptions
  1913.  
  1914.                         (prompt (cat #studio_components_addons #studio_parts_uninstall_b))
  1915.  
  1916.                         (help #studio_addons_help)
  1917.  
  1918.                         (choices
  1919.  
  1920.                             #studio_addons_envasm
  1921.                             #studio_addons_envbat
  1922.                             #studio_addons_envfax
  1923.                             #studio_addons_envmdt
  1924.                             #studio_addons_envthr
  1925.                             #studio_addons_envjcy
  1926.                         )   
  1927.  
  1928.                         (default 0)
  1929.                     )
  1930.                 )
  1931.  
  1932.                 (set studio_removeaddons_c
  1933.  
  1934.                     (askoptions
  1935.  
  1936.                         (prompt (cat #studio_components_addons #studio_parts_uninstall_c))
  1937.  
  1938.                         (help #studio_addons_help)
  1939.  
  1940.                         (choices
  1941.  
  1942.                             #studio_addons_envprt
  1943.                             #studio_addons_envrcs
  1944.                             #studio_addons_envins
  1945.                             #studio_addons_envwrp
  1946.                             #studio_addons_envreg
  1947.                             #studio_addons_envswp
  1948.                         )   
  1949.  
  1950.                         (default 0)
  1951.                     )
  1952.                 )
  1953.             )
  1954.         )
  1955.  
  1956.         ; remove starter(s)
  1957.  
  1958.         (if (bitand studio_remove @studio_components_starter)
  1959.  
  1960.             (
  1961.                 (set studio_removestarter
  1962.  
  1963.                     (askoptions
  1964.  
  1965.                         (prompt (cat #studio_components_starter #studio_parts_uninstall))
  1966.  
  1967.                         (help #studio_starter_help)
  1968.  
  1969.                         (choices
  1970.  
  1971.                             #studio_starter_ed
  1972.                             #studio_starter_appicon
  1973.                         )
  1974.  
  1975.                         (default 0)
  1976.                     )
  1977.                 )
  1978.             )
  1979.         )
  1980.  
  1981.         ; remove documentation
  1982.  
  1983.         (if (bitand studio_remove @studio_components_docs)
  1984.  
  1985.             (
  1986.                 (set studio_removemanual
  1987.  
  1988.                     (askoptions
  1989.  
  1990.                         (prompt (cat #studio_components_docs #studio_parts_uninstall))
  1991.  
  1992.                         (help #studio_manual_help)
  1993.  
  1994.                         (choices
  1995.  
  1996.                             #studio_manual_history
  1997.                             #studio_manual_licence
  1998.                             #studio_manual_order
  1999.                             #studio_manual_english
  2000.                             #studio_manual_german
  2001.                         )   
  2002.  
  2003.                         (default 0)
  2004.                     )
  2005.                 )
  2006.             )
  2007.         )
  2008.     )
  2009. )
  2010.  
  2011. ; choose preferred language (input: <studio_language>, output: <studio_language>
  2012.  
  2013. (procedure studio_proc_chooselanguage
  2014.  
  2015.     (
  2016.         (while (not (exists ("installdata/locale/%s/standard.menu" studio_language)))
  2017.  
  2018.             (if (= @language "english") (set studio_locale 0))
  2019.             (if (= @language "deutsch") (set studio_locale 1))
  2020.  
  2021.             (set studio_locale
  2022.  
  2023.                 (askchoice
  2024.  
  2025.                     (prompt #studio_locale)
  2026.  
  2027.                     (help #studio_locale_help)
  2028.  
  2029.                     (choices
  2030.  
  2031.                         "English"
  2032.                         "Deutsch"
  2033.                     )
  2034.  
  2035.                     (default studio_locale)
  2036.                 )
  2037.             )
  2038.  
  2039.             (if (= studio_locale 0) (set studio_language "english"))
  2040.             (if (= studio_locale 1) (set studio_language "deutsch"))
  2041.         )
  2042.     )
  2043. )
  2044.  
  2045. ; install registry editor (input: none)
  2046.  
  2047. (procedure studio_proc_installregedit
  2048.  
  2049.     (
  2050.         (if (= studio_regedit "")
  2051.  
  2052.             (
  2053.                 (set studio_regedit "golded:add-ons/regedit/regedit")
  2054.  
  2055.                 (if (exists studio_regedit)
  2056.  
  2057.                     (
  2058.                         (set oldver (getversion studio_regedit))
  2059.  
  2060.                         (set newver (getversion "installdata/golded/add-ons/regedit/regedit"))
  2061.  
  2062.                         (if (> newver oldver)
  2063.  
  2064.                             (copyfiles
  2065.  
  2066.                                 (source "installdata/golded/add-ons/regedit")
  2067.  
  2068.                                 (dest "golded:add-ons/regedit")
  2069.  
  2070.                                 (all)
  2071.                             )
  2072.                         )
  2073.                     )
  2074.  
  2075.                     (copyfiles
  2076.  
  2077.                         (source "installdata/golded/add-ons/regedit")
  2078.  
  2079.                         (dest "golded:add-ons/regedit")
  2080.  
  2081.                         (all)
  2082.                     )
  2083.                 )
  2084.             )
  2085.         )
  2086.     )
  2087. )
  2088.  
  2089. ; check existing setup (input: <studio_path>, output: <studio_yourname>, <studio_serial>, <studio_components>)
  2090.  
  2091. (procedure studio_proc_checksetup
  2092.  
  2093.     (
  2094.         (working studio_checking)
  2095.  
  2096.         (makeassign "golded" studio_path)
  2097.  
  2098.         (if (exists "golded:" (noreq))
  2099.  
  2100.             (
  2101.                 ; read env variables from last installation
  2102.  
  2103.                 (if (exists "golded:etc/env")
  2104.  
  2105.                     (
  2106.                         (if (= (exists "golded:etc/env/name") 1)
  2107.  
  2108.                             (
  2109.                                 (run "installdata/programs/setenv NAME=NAME FROM=golded:etc/env/name")
  2110.  
  2111.                                 (set studio_yourname (getenv "NAME"))
  2112.                             )
  2113.                         )
  2114.  
  2115.                         (if (= (exists "golded:etc/env/language") 1)
  2116.  
  2117.                             (
  2118.                                 (run "installdata/programs/setenv NAME=LANGUAGE FROM=golded:etc/env/language")
  2119.  
  2120.                                 (set studio_language (getenv "LANGUAGE"))
  2121.                             )
  2122.                         )
  2123.  
  2124.                         (if (= (exists "golded:etc/env/serial") 1)
  2125.  
  2126.                             (
  2127.                                 (run "installdata/programs/setenv NAME=SERIAL FROM=golded:etc/env/serial")
  2128.  
  2129.                                 (set studio_serial (getenv "SERIAL"))
  2130.                             )
  2131.                         )
  2132.                     )
  2133.                 )
  2134.  
  2135.                 ; check installed components
  2136.  
  2137.                 (set studio_components 0)
  2138.                 (set studio_starter    0)
  2139.                 (set studio_manual     0)
  2140.                 (set studio_addons_a   0)
  2141.                 (set studio_addons_b   0)
  2142.                 (set studio_addons_c   0)
  2143.  
  2144.                 (if (exists "golded:golded")
  2145.  
  2146.                     (set studio_components (+ studio_components @studio_components_golded))
  2147.                 )
  2148.  
  2149.                 (if (exists "golded:ed")
  2150.  
  2151.                     (set studio_starter (+ studio_starter @studio_starter_ed))
  2152.                 )
  2153.  
  2154.                 (if (exists "golded:Drag & drop")
  2155.  
  2156.                     (set studio_starter (+ studio_starter @studio_starter_appicon))
  2157.                 )
  2158.  
  2159.                 (if (<> studio_starter 0)
  2160.  
  2161.                     (set studio_components (+ studio_components @studio_components_starter))
  2162.                 )
  2163.  
  2164.                 (if (exists "golded:History")
  2165.  
  2166.                     (set studio_manual (+ studio_manual @studio_manual_history))
  2167.                 )
  2168.  
  2169.                 (if (exists "golded:Licence")
  2170.  
  2171.                     (set studio_manual (+ studio_manual @studio_manual_licence))
  2172.                 )
  2173.  
  2174.                 (if (exists "golded:Order")
  2175.  
  2176.                     (set studio_manual (+ studio_manual @studio_manual_order))
  2177.                 )
  2178.  
  2179.                 (if (exists "golded:Manual")
  2180.  
  2181.                     (set studio_manual (+ studio_manual @studio_manual_english))
  2182.                 )
  2183.  
  2184.                 (if (exists "golded:Anleitung")
  2185.  
  2186.                     (set studio_manual (+ studio_manual @studio_manual_german))
  2187.                 )
  2188.  
  2189.                 (if (<> 0 studio_manual)
  2190.  
  2191.                     (set studio_components (+ studio_components @studio_components_docs))
  2192.                 )
  2193.  
  2194.                 (if (exists "golded:add-ons/webworld")
  2195.  
  2196.                     (set studio_addons_a (+ studio_addons_a @studio_addons_envwww))
  2197.                 )
  2198.  
  2199.                 (if (exists "golded:add-ons/makeguide")
  2200.  
  2201.                     (set studio_addons_a (+ studio_addons_a @studio_addons_envgde))
  2202.                 )
  2203.  
  2204.                 (if (exists "golded:add-ons/thesaurus")
  2205.  
  2206.                     (set studio_addons_a (+ studio_addons_a @studio_addons_envthe))
  2207.                 )
  2208.  
  2209.                 (if (exists "golded:add-ons/c++")
  2210.  
  2211.                     (set studio_addons_a (+ studio_addons_a @studio_addons_envcpp))
  2212.                 )
  2213.  
  2214.                 (if (exists "golded:add-ons/stormc")
  2215.  
  2216.                     (set studio_addons_a (+ studio_addons_a @studio_addons_envstm))
  2217.                 )
  2218.  
  2219.                 (if (exists "golded:add-ons/sas-c")
  2220.  
  2221.                     (set studio_addons_a (+ studio_addons_a @studio_addons_envsas))
  2222.                 )
  2223.  
  2224.                 (if (exists "golded:add-ons/a68k")
  2225.  
  2226.                     (set studio_addons_b (+ studio_addons_b @studio_addons_envasm))
  2227.                 )
  2228.  
  2229.                 (if (exists "golded:add-ons/scripting")
  2230.  
  2231.                     (set studio_addons_b (+ studio_addons_b @studio_addons_envbat))
  2232.                 )
  2233.  
  2234.                 (if (exists "golded:add-ons/fax")
  2235.  
  2236.                     (set studio_addons_b (+ studio_addons_b @studio_addons_envfax))
  2237.                 )
  2238.  
  2239.                 (if (exists "golded:add-ons/microdot")
  2240.  
  2241.                     (set studio_addons_b (+ studio_addons_b @studio_addons_envmdt))
  2242.                 )
  2243.  
  2244.                 (if (exists "golded:add-ons/thor")
  2245.  
  2246.                     (set studio_addons_b (+ studio_addons_b @studio_addons_envthr))
  2247.                 )
  2248.  
  2249.                 (if (exists "golded:add-ons/joyce")
  2250.  
  2251.                     (set studio_addons_b (+ studio_addons_b @studio_addons_envjcy))
  2252.                 )
  2253.  
  2254.                 (if (exists "golded:add-ons/print")
  2255.  
  2256.                     (set studio_addons_c (+ studio_addons_c @studio_addons_envprt))
  2257.                 )
  2258.  
  2259.                 (if (exists "golded:add-ons/rcs")
  2260.  
  2261.                     (set studio_addons_c (+ studio_addons_c @studio_addons_envrcs))
  2262.                 )
  2263.  
  2264.                 (if (exists "golded:add-ons/installer")
  2265.  
  2266.                     (set studio_addons_c (+ studio_addons_c @studio_addons_envins))
  2267.                 )
  2268.  
  2269.                 (if (exists "golded:add-ons/wrapper")
  2270.  
  2271.                     (set studio_addons_c (+ studio_addons_c @studio_addons_envwrp))
  2272.                 )
  2273.  
  2274.                 (if (exists "golded:add-ons/register")
  2275.  
  2276.                     (set studio_addons_c (+ studio_addons_c @studio_addons_envreg))
  2277.                 )
  2278.  
  2279.                 (if (exists "golded:add-ons/minesweeper")
  2280.  
  2281.                     (set studio_addons_c (+ studio_addons_c @studio_addons_envswp))
  2282.                 )
  2283.  
  2284.                 (if (or (<> studio_addons_a 0) (<> studio_addons_b 0) (<> studio_addons_c 0))
  2285.  
  2286.                     (set studio_components (+ studio_components @studio_components_addons))
  2287.                 )
  2288.                 
  2289.                 (if (or (exists "golded:developer/api") (exists "golded:developer/catalogs") (exists "golded:developer/include") (exists "golded:developer/registry") (exists "golded:developer/scanner") (exists "golded:developer/source") (exists "golded:developer/syntax"))
  2290.                 
  2291.                     (set studio_components (+ studio_components @studio_components_developer))
  2292.                 )
  2293.                 
  2294.                 (if (exists "golded:screenshot")
  2295.                 
  2296.                     (set studio_components (+ studio_components @studio_components_screenshot))
  2297.                 )
  2298.                 
  2299.                 (if (exists "golded:recover")
  2300.                 
  2301.                     (set studio_components (+ studio_components @studio_components_recover))
  2302.                 )
  2303.             )
  2304.         )
  2305.     )
  2306. )
  2307.  
  2308. ; install presets (input: none)
  2309.  
  2310. (procedure studio_proc_installpresets
  2311.  
  2312.     (
  2313.         (set studio_preset_install_a
  2314.  
  2315.             (askoptions
  2316.  
  2317.                 (prompt #studio_preset_install_a)
  2318.  
  2319.                 (choices
  2320.  
  2321.                     #studio_preset_display     
  2322.                     #studio_preset_interface   
  2323.                     #studio_preset_hunter      
  2324.                     #studio_preset_printer     
  2325.                     #studio_preset_context
  2326.                     #studio_preset_syntax      
  2327.                     #studio_preset_layout      
  2328.                     #studio_preset_mouse       
  2329.                     #studio_preset_menu        
  2330.                 )
  2331.  
  2332.                 (default 0)
  2333.  
  2334.                 (help #studio_preset_install_help)
  2335.             )
  2336.         )
  2337.  
  2338.         (set studio_preset_install_b
  2339.  
  2340.             (askoptions
  2341.  
  2342.                 (prompt #studio_preset_install_b)
  2343.  
  2344.                 (choices
  2345.  
  2346.                     #studio_preset_api         
  2347.                     #studio_preset_project     
  2348.                     #studio_preset_references  
  2349.                     #studio_preset_gadgets     
  2350.                     #studio_preset_tabs        
  2351.                     #studio_preset_keyboard    
  2352.                     #studio_preset_templates   
  2353.                     #studio_preset_misc        
  2354.                     #studio_preset_dictionary  
  2355.                 )
  2356.  
  2357.                 (default 0)
  2358.  
  2359.                 (help #studio_preset_install_help)
  2360.             )
  2361.         )
  2362.  
  2363.         (if (or studio_preset_install_a studio_preset_install_b)
  2364.  
  2365.             (
  2366.                 (if (bitand studio_preset_install_a (+ @studio_preset_mouse @studio_preset_menu @studio_preset_gadgets))
  2367.  
  2368.                     (studio_proc_chooselanguage)
  2369.                 )
  2370.  
  2371.                 (if (bitand studio_preset_install_a @studio_preset_display)
  2372.  
  2373.                     (
  2374.                         (run ("%s PRESET installdata/locale/%s/standard.display" studio_regedit studio_language))
  2375.  
  2376.                         ; reset font
  2377.  
  2378.                         (run bin "installdata/programs/installfont file=golded:etc/registry/presets/standard.display")
  2379.                     )
  2380.                 )
  2381.  
  2382.                 (if (bitand studio_preset_install_a @studio_preset_interface)
  2383.  
  2384.                     (run ("%s PRESET installdata/registry/presets/standard.interface" studio_regedit))
  2385.                 )
  2386.  
  2387.                 (if (bitand studio_preset_install_a @studio_preset_hunter)
  2388.  
  2389.                     (run ("%s PRESET installdata/registry/presets/standard.hunter" studio_regedit))
  2390.                 )
  2391.  
  2392.                 (if (bitand studio_preset_install_a @studio_preset_printer)
  2393.  
  2394.                     (run ("%s PRESET installdata/registry/presets/standard.printer" studio_regedit))
  2395.                 )
  2396.  
  2397.                 (if (bitand studio_preset_install_a @studio_preset_context)
  2398.  
  2399.                     (run ("%s PRESET installdata/registry/presets/standard.context" studio_regedit))
  2400.                 )
  2401.  
  2402.                 (if (bitand studio_preset_install_a @studio_preset_syntax)
  2403.  
  2404.                     (run ("%s PRESET installdata/registry/presets/standard.syntax" studio_regedit))
  2405.                 )
  2406.  
  2407.                 (if (bitand studio_preset_install_a @studio_preset_layout)
  2408.  
  2409.                     (run ("%s PRESET installdata/registry/presets/standard.layout" studio_regedit))
  2410.                 )
  2411.  
  2412.                 (if (bitand studio_preset_install_a @studio_preset_mouse)
  2413.  
  2414.                     (run ("%s PRESET installdata/locale/%s/standard.mouse" studio_regedit studio_language))
  2415.                 )
  2416.  
  2417.                 (if (bitand studio_preset_install_a @studio_preset_menu)
  2418.  
  2419.                     (run ("%s PRESET installdata/locale/%s/standard.menu" studio_regedit studio_language))
  2420.                 )
  2421.  
  2422.                 (if (bitand studio_preset_install_b @studio_preset_api)
  2423.  
  2424.                     (run ("%s PRESET installdata/registry/presets/standard.api" studio_regedit))
  2425.                 )
  2426.  
  2427.                 (if (bitand studio_preset_install_b @studio_preset_project)
  2428.  
  2429.                     (run ("%s PRESET installdata/registry/presets/standard.project" studio_regedit))
  2430.                 )
  2431.  
  2432.                 (if (bitand studio_preset_install_b @studio_preset_references)
  2433.  
  2434.                     (run ("%s PRESET installdata/registry/presets/standard.references" studio_regedit))
  2435.                 )
  2436.  
  2437.                 (if (bitand studio_preset_install_b @studio_preset_gadgets)
  2438.  
  2439.                     (run ("%s PRESET installdata/locale/%s/standard.gadgets" studio_regedit studio_language))
  2440.                 )
  2441.  
  2442.                 (if (bitand studio_preset_install_b @studio_preset_tabs)
  2443.  
  2444.                     (run ("%s PRESET installdata/registry/presets/standard.tabs" studio_regedit))
  2445.                 )
  2446.  
  2447.                 (if (bitand studio_preset_install_b @studio_preset_keyboard)
  2448.  
  2449.                     (run ("%s PRESET installdata/registry/presets/standard.keyboard" studio_regedit))
  2450.                 )
  2451.  
  2452.                 (if (bitand studio_preset_install_b @studio_preset_templates)
  2453.  
  2454.                     (run ("%s PRESET installdata/registry/presets/standard.templates" studio_regedit))
  2455.                 )
  2456.  
  2457.                 (if (bitand studio_preset_install_b @studio_preset_misc)
  2458.  
  2459.                     (run ("%s PRESET installdata/registry/presets/standard.misc" studio_regedit))
  2460.                 )
  2461.  
  2462.                 (if (bitand studio_preset_install_b @studio_preset_dictionary)
  2463.  
  2464.                     (run ("%s PRESET installdata/registry/presets/standard.dictionary" studio_regedit))
  2465.                 )
  2466.             )
  2467.         )
  2468.  
  2469.         (run "installdata/programs/unprotect basedir=golded:etc/registry")
  2470.     )
  2471. )
  2472.  
  2473. ; install components (input: <studio_components>, <studio_starter>, <studio_manual>)
  2474.  
  2475. (procedure studio_proc_installcomponents
  2476.  
  2477.     (
  2478.         ; always install reqtools library
  2479.  
  2480.         (if (not (exists "golded:etc/libs/reqtools.library"))
  2481.  
  2482.             (
  2483.                 (copyfiles
  2484.  
  2485.                     (source "bonus/reqtools/reqtools.library")
  2486.  
  2487.                     (dest "golded:etc/libs")
  2488.                 )
  2489.  
  2490.                 (run "assign libs: golded:etc/libs add")
  2491.             )
  2492.         )
  2493.  
  2494.         ; install editor
  2495.  
  2496.         (if (bitand studio_components @studio_components_golded)
  2497.  
  2498.             (
  2499.                 ; always install 68000 binary (all other versions are optional and untested)
  2500.  
  2501.                 (set studio_cpu @studio_cpu_68000)
  2502.  
  2503.                 (if (= studio_cpu @studio_cpu_68000)
  2504.  
  2505.                     (set studio_binary "68000")
  2506.                 )
  2507.  
  2508.                 (if (= studio_cpu @studio_cpu_68020)
  2509.  
  2510.                     (set studio_binary "68020")
  2511.                 )
  2512.  
  2513.                 (if (= studio_cpu @studio_cpu_68030)
  2514.  
  2515.                     (set studio_binary "68030")
  2516.                 )
  2517.  
  2518.                 (if (= studio_cpu @studio_cpu_68040)
  2519.  
  2520.                     (set studio_binary "68040")
  2521.                 )
  2522.  
  2523.                 (if (= studio_cpu @studio_cpu_68060)
  2524.  
  2525.                     (set studio_binary "68060")
  2526.                 )
  2527.  
  2528.                 (copyfiles
  2529.  
  2530.                     (source (cat "installdata/cpu/" studio_binary "/GoldED"))
  2531.  
  2532.                     (dest "golded:")
  2533.                 )
  2534.  
  2535.                 (copyfiles
  2536.  
  2537.                     (source "installdata/golded/GoldED.info")
  2538.  
  2539.                     (dest "golded:")
  2540.                 )
  2541.  
  2542.                 (copyfiles
  2543.  
  2544.                     (source "installdata/golded/etc")
  2545.  
  2546.                     (dest "golded:etc")
  2547.  
  2548.                     (all)
  2549.                 )
  2550.  
  2551.                 (run "assign fonts: golded:etc/fonts add")
  2552.  
  2553.                 ; request reboot
  2554.  
  2555.                 (set studio_reboot 1)
  2556.             )
  2557.         )
  2558.  
  2559.         ; install presets and registry
  2560.  
  2561.         (if (bitand studio_components @studio_components_config)
  2562.  
  2563.             (
  2564.                 (studio_proc_chooselanguage)
  2565.  
  2566.                 (run ("%s PRESET installdata/registry/presets/standard.interface"  studio_regedit))
  2567.                 (run ("%s PRESET installdata/registry/presets/standard.hunter"     studio_regedit))
  2568.                 (run ("%s PRESET installdata/registry/presets/standard.printer"    studio_regedit))
  2569.                 (run ("%s PRESET installdata/registry/presets/standard.context"    studio_regedit))
  2570.                 (run ("%s PRESET installdata/registry/presets/standard.syntax"     studio_regedit))
  2571.                 (run ("%s PRESET installdata/registry/presets/standard.layout"     studio_regedit))
  2572.                 (run ("%s PRESET installdata/registry/presets/standard.api"        studio_regedit))
  2573.                 (run ("%s PRESET installdata/registry/presets/standard.project"    studio_regedit))
  2574.                 (run ("%s PRESET installdata/registry/presets/standard.references" studio_regedit))
  2575.                 (run ("%s PRESET installdata/registry/presets/standard.tabs"       studio_regedit))
  2576.                 (run ("%s PRESET installdata/registry/presets/standard.keyboard"   studio_regedit))
  2577.                 (run ("%s PRESET installdata/registry/presets/standard.templates"  studio_regedit))
  2578.                 (run ("%s PRESET installdata/registry/presets/standard.misc"       studio_regedit))
  2579.                 (run ("%s PRESET installdata/registry/presets/standard.dictionary" studio_regedit))
  2580.  
  2581.                 ; localized presets
  2582.  
  2583.                 (run ("%s PRESET installdata/locale/%s/standard.mouse  " studio_regedit studio_language))
  2584.                 (run ("%s PRESET installdata/locale/%s/standard.menu   " studio_regedit studio_language))
  2585.                 (run ("%s PRESET installdata/locale/%s/standard.gadgets" studio_regedit studio_language))
  2586.                 (run ("%s PRESET installdata/locale/%s/standard.display" studio_regedit studio_language))
  2587.  
  2588.                 ; choose a font
  2589.  
  2590.                 (run bin "installdata/programs/installfont file=golded:etc/registry/presets/standard.display")
  2591.  
  2592.                 ; install registry
  2593.  
  2594.                 (copyfiles
  2595.  
  2596.                     (source "installdata/registry/registry")
  2597.  
  2598.                     (dest "golded:etc/registry")
  2599.                 )
  2600.  
  2601.                 ; remove write protection for material copied from CD-ROM
  2602.  
  2603.                 (run "installdata/programs/unprotect basedir=golded:etc/registry")
  2604.  
  2605.                 ; save install path and serial code in registry
  2606.  
  2607.                 (run ("golded:add-ons/regedit/regedit SERIAL=\"%s\" INSTALLPATH=\"%s\"" studio_serial (expandpath "")))
  2608.             )
  2609.         )
  2610.  
  2611.         ; install starters
  2612.  
  2613.         (if (bitand studio_components @studio_components_starter)
  2614.  
  2615.             (
  2616.                 (if (bitand studio_starter @studio_starter_ed)
  2617.  
  2618.                     (copyfiles
  2619.  
  2620.                         (source "installdata/golded/ed")
  2621.  
  2622.                         (dest "golded:")
  2623.                     )
  2624.                 )
  2625.  
  2626.                 (if (bitand studio_starter @studio_starter_appicon)
  2627.  
  2628.                     (
  2629.                         (copyfiles
  2630.  
  2631.                             (source "installdata/golded/Drag & Drop")
  2632.  
  2633.                             (dest "golded:")
  2634.                         )
  2635.  
  2636.                         (copyfiles
  2637.  
  2638.                             (source "installdata/golded/Drag & Drop.info")
  2639.  
  2640.                             (dest "golded:")
  2641.                         )
  2642.                     )
  2643.                 )
  2644.             )
  2645.         )
  2646.  
  2647.         ; install documentation
  2648.  
  2649.         (if (bitand studio_components @studio_components_docs)
  2650.  
  2651.             (
  2652.                 (if (bitand studio_manual @studio_manual_history)
  2653.  
  2654.                     (copyfiles
  2655.  
  2656.                         (source "installdata/golded/History")
  2657.  
  2658.                         (dest "golded:")
  2659.                     )
  2660.                 )
  2661.  
  2662.                 (if (bitand studio_manual @studio_manual_licence)
  2663.  
  2664.                     (
  2665.                         (copyfiles
  2666.  
  2667.                             (source "installdata/golded/Licence")
  2668.  
  2669.                             (dest "golded:")
  2670.                         )
  2671.  
  2672.                         (copyfiles
  2673.  
  2674.                             (source "installdata/golded/Licence.info")
  2675.  
  2676.                             (dest "golded:")
  2677.                         )
  2678.                     )
  2679.                 )
  2680.  
  2681.                 (if (bitand studio_manual @studio_manual_order)
  2682.  
  2683.                     (
  2684.                         (copyfiles
  2685.  
  2686.                             (source "installdata/golded/Order")
  2687.  
  2688.                             (dest "golded:")
  2689.                         )
  2690.  
  2691.                         (copyfiles
  2692.  
  2693.                             (source "installdata/golded/Order.info")
  2694.  
  2695.                             (dest "golded:")
  2696.                         )
  2697.                     )
  2698.                 )
  2699.  
  2700.                 (if (bitand studio_manual @studio_manual_english)
  2701.  
  2702.                     (
  2703.                         (copyfiles
  2704.  
  2705.                             (source "installdata/golded/Manual")
  2706.  
  2707.                             (dest "golded:")
  2708.                         )
  2709.  
  2710.                         (copyfiles
  2711.  
  2712.                             (source "installdata/golded/Manual.info")
  2713.  
  2714.                             (dest "golded:")
  2715.                         )
  2716.                     )
  2717.                 )
  2718.  
  2719.                 (if (bitand studio_manual @studio_manual_german)
  2720.  
  2721.                     (
  2722.                         (copyfiles
  2723.  
  2724.                             (source "installdata/golded/Anleitung")
  2725.  
  2726.                             (dest "golded:")
  2727.                         )
  2728.  
  2729.                         (copyfiles
  2730.  
  2731.                             (source "installdata/golded/Anleitung.info")
  2732.  
  2733.                             (dest "golded:")
  2734.                         )
  2735.                     )
  2736.                 )
  2737.             )
  2738.         )
  2739.  
  2740.         ; install screenshot
  2741.  
  2742.         (if (bitand studio_components @studio_components_screenshot)
  2743.  
  2744.             (
  2745.                 (copyfiles
  2746.  
  2747.                     (source "installdata/golded/Screenshot")
  2748.  
  2749.                     (dest "golded:")
  2750.                 )
  2751.  
  2752.                 (copyfiles
  2753.  
  2754.                     (source "installdata/golded/Screenshot.info")
  2755.  
  2756.                     (dest "golded:")
  2757.                 )
  2758.             )
  2759.         )
  2760.  
  2761.         ; install developer material
  2762.  
  2763.         (if (bitand studio_components @studio_components_developer)
  2764.  
  2765.             (
  2766.                 (makedir "golded:developer")
  2767.  
  2768.                 (copyfiles
  2769.  
  2770.                     (source "installdata/golded/developer")
  2771.  
  2772.                     (dest "golded:developer")
  2773.  
  2774.                     (all)
  2775.                 )
  2776.             )
  2777.         )
  2778.  
  2779.         ; install recovery program
  2780.  
  2781.         (if (bitand studio_components @studio_components_recover)
  2782.  
  2783.             (
  2784.                 (copyfiles
  2785.  
  2786.                     (source "installdata/golded/Recover")
  2787.  
  2788.                     (dest "golded:")
  2789.                 )
  2790.  
  2791.                 (copyfiles
  2792.  
  2793.                     (source "installdata/golded/Recover.info")
  2794.  
  2795.                     (dest "golded:")
  2796.                 )
  2797.             )
  2798.         )
  2799.  
  2800.         ; install add-onds (to-do)
  2801.  
  2802.         (if (bitand studio_components @studio_components_addons)
  2803.  
  2804.             (
  2805.                 (working #studio_addons_install)
  2806.  
  2807.                 (if (bitand studio_addons_a @studio_addons_envwww)
  2808.  
  2809.                     (
  2810.                         (set studio_installpath "installdata/golded/add-ons/envWWW30/setup")
  2811.  
  2812.                         (studio_proc_install)
  2813.                     )
  2814.                 )
  2815.  
  2816.                 (if (bitand studio_addons_a @studio_addons_envgde)
  2817.  
  2818.                     (
  2819.                         (set studio_installpath "installdata/golded/add-ons/envGDE15/setup")
  2820.  
  2821.                         (studio_proc_install)
  2822.                     )
  2823.                 )
  2824.  
  2825.                 (if (bitand studio_addons_a @studio_addons_envthe)
  2826.  
  2827.                     (
  2828.                         (set studio_installpath "installdata/golded/add-ons/envTHE10/setup")
  2829.  
  2830.                         (studio_proc_install)
  2831.                     )
  2832.                 )
  2833.  
  2834.                 (if (bitand studio_addons_a @studio_addons_envcpp)
  2835.  
  2836.                     (
  2837.                         (set studio_installpath "installdata/golded/add-ons/envCPP25/setup")
  2838.  
  2839.                         (studio_proc_install)
  2840.                     )
  2841.                 )
  2842.  
  2843.                 (if (bitand studio_addons_a @studio_addons_envstm)
  2844.  
  2845.                     (
  2846.                         (set studio_installpath "installdata/golded/add-ons/envSTM25/setup")
  2847.  
  2848.                         (studio_proc_install)
  2849.                     )
  2850.                 )
  2851.  
  2852.                 (if (bitand studio_addons_a @studio_addons_envsas)
  2853.  
  2854.                     (
  2855.                         (set studio_installpath "installdata/golded/add-ons/envSAS10/setup")
  2856.  
  2857.                         (studio_proc_install)
  2858.                     )
  2859.                 )
  2860.  
  2861.                 (if (bitand studio_addons_b @studio_addons_envasm)
  2862.  
  2863.                     (
  2864.                         (set studio_installpath "installdata/golded/add-ons/envASM13/setup")
  2865.  
  2866.                         (studio_proc_install)
  2867.                     )
  2868.                 )
  2869.  
  2870.                 (if (bitand studio_addons_b @studio_addons_envbat)
  2871.  
  2872.                     (
  2873.                         (set studio_installpath "installdata/golded/add-ons/envBAT13/setup")
  2874.  
  2875.                         (studio_proc_install)
  2876.                     )
  2877.                 )
  2878.  
  2879.                 (if (bitand studio_addons_b @studio_addons_envfax)
  2880.  
  2881.                     (
  2882.                         (set studio_installpath "installdata/golded/add-ons/envFAX10/setup")
  2883.  
  2884.                         (studio_proc_install)
  2885.                     )
  2886.                 )
  2887.  
  2888.                 (if (bitand studio_addons_b @studio_addons_envmdt)
  2889.  
  2890.                     (
  2891.                         (set studio_installpath "installdata/golded/add-ons/envMDT23/setup")
  2892.  
  2893.                         (studio_proc_install)
  2894.                     )
  2895.                 )
  2896.  
  2897.                 (if (bitand studio_addons_b @studio_addons_envthr)
  2898.  
  2899.                     (
  2900.                         (set studio_installpath "installdata/golded/add-ons/envTHR10/setup")
  2901.  
  2902.                         (studio_proc_install)
  2903.                     )
  2904.                 )
  2905.  
  2906.                 (if (bitand studio_addons_b @studio_addons_envjcy)
  2907.  
  2908.                     (
  2909.                         (set studio_installpath "installdata/golded/add-ons/envJCY50/setup")
  2910.  
  2911.                         (studio_proc_install)
  2912.                     )
  2913.                 )
  2914.  
  2915.                 (if (bitand studio_addons_c @studio_addons_envprt)
  2916.  
  2917.                     (
  2918.                         (set studio_installpath "installdata/golded/add-ons/envPRT63/setup")
  2919.  
  2920.                         (studio_proc_install)
  2921.                     )
  2922.                 )
  2923.  
  2924.                 (if (bitand studio_addons_c @studio_addons_envrcs)
  2925.  
  2926.                     (
  2927.                         (set studio_installpath "installdata/golded/add-ons/envRCS11/setup")
  2928.  
  2929.                         (studio_proc_install)
  2930.                     )
  2931.                 )
  2932.  
  2933.                 (if (bitand studio_addons_c @studio_addons_envins)
  2934.  
  2935.                     (
  2936.                         (set studio_installpath "installdata/golded/add-ons/envINS10/setup")
  2937.  
  2938.                         (studio_proc_install)
  2939.                     )
  2940.                 )
  2941.  
  2942.                 (if (bitand studio_addons_c @studio_addons_envwrp)
  2943.  
  2944.                     (
  2945.                         (set studio_installpath "installdata/golded/add-ons/envWRP10/setup")
  2946.  
  2947.                         (studio_proc_install)
  2948.                     )
  2949.                 )
  2950.  
  2951.                 (if (bitand studio_addons_c @studio_addons_envreg)
  2952.  
  2953.                     (
  2954.                         (set studio_installpath "installdata/golded/add-ons/envREG10/setup")
  2955.  
  2956.                         (studio_proc_install)
  2957.                     )
  2958.                 )
  2959.  
  2960.                 (if (bitand studio_addons_c @studio_addons_envswp)
  2961.  
  2962.                     (
  2963.                         (set studio_installpath "installdata/golded/add-ons/envSWP10/setup")
  2964.  
  2965.                         (studio_proc_install)
  2966.                     )
  2967.                 )
  2968.             )
  2969.         )
  2970.  
  2971.         (run "installdata/programs/unprotect basedir=golded:")
  2972.     )
  2973. )
  2974.  
  2975. ; remove components (input: <studio_remove>)
  2976.  
  2977. (procedure studio_proc_removecomponents
  2978.  
  2979.     (
  2980.         ; remove editor
  2981.  
  2982.         (if (bitand studio_remove @studio_components_golded)
  2983.  
  2984.             (delete "golded:GoldED")
  2985.         )
  2986.  
  2987.         ; remove starters
  2988.  
  2989.         (if (bitand studio_remove @studio_components_starter)
  2990.  
  2991.             (
  2992.                 (if (bitand studio_removestarter @studio_starter_ed)
  2993.  
  2994.                     (delete "golded:ed")
  2995.                 )
  2996.  
  2997.                 (if (bitand studio_removestarter @studio_starter_appicon)
  2998.  
  2999.                     (delete "golded:Drag & drop")
  3000.                 )
  3001.             )
  3002.         )
  3003.  
  3004.         ; remove documentation
  3005.  
  3006.         (if (bitand studio_remove @studio_components_docs)
  3007.  
  3008.             (
  3009.                 (if (bitand studio_removemanual @studio_manual_history)
  3010.  
  3011.                     (delete "golded:History")
  3012.                 )
  3013.  
  3014.                 (if (bitand studio_removemanual @studio_manual_licence)
  3015.  
  3016.                     (delete "golded:Licence")
  3017.                 )
  3018.  
  3019.                 (if (bitand studio_removemanual @studio_manual_order)
  3020.  
  3021.                     (delete "golded:Order")
  3022.                 )
  3023.  
  3024.                 (if (bitand studio_removemanual @studio_manual_english)
  3025.  
  3026.                     (delete "golded:Manual")
  3027.                 )
  3028.  
  3029.                 (if (bitand studio_removemanual @studio_manual_german)
  3030.  
  3031.                     (delete "golded:Anleitung")
  3032.                 )
  3033.             )
  3034.         )
  3035.  
  3036.         ; remove developer material
  3037.  
  3038.         (if (bitand studio_remove @studio_components_developer)
  3039.  
  3040.             ("run delete golded:developer all quiet")
  3041.         )
  3042.  
  3043.         ; remove screenshot
  3044.  
  3045.         (if (bitand studio_remove @studio_components_screenshot)
  3046.  
  3047.             (delete "golded:Screenshot")
  3048.         )
  3049.  
  3050.         ; remove recovery program
  3051.  
  3052.         (if (bitand studio_remove @studio_components_recover)
  3053.  
  3054.             (delete "golded:Recover")
  3055.         )
  3056.  
  3057.         ; remove add-ons
  3058.  
  3059.         (if (bitand studio_remove @studio_components_addons)
  3060.  
  3061.             (
  3062.                 (if (bitand studio_removeaddons_a @studio_addons_envwww)
  3063.  
  3064.                     (
  3065.                         (set studio_installpath "installdata/golded/add-ons/envWWW30/setup")
  3066.  
  3067.                         (studio_proc_uninstall)
  3068.                     )
  3069.                 )
  3070.  
  3071.                 (if (bitand studio_removeaddons_a @studio_addons_envgde)
  3072.  
  3073.                     (
  3074.                         (set studio_installpath "installdata/golded/add-ons/envGDE15/setup")
  3075.  
  3076.                         (studio_proc_uninstall)
  3077.                     )
  3078.                 )
  3079.  
  3080.                 (if (bitand studio_removeaddons_a @studio_addons_envthe)
  3081.  
  3082.                     (
  3083.                         (set studio_installpath "installdata/golded/add-ons/envTHE10/setup")
  3084.  
  3085.                         (studio_proc_uninstall)
  3086.                     )
  3087.                 )
  3088.  
  3089.                 (if (bitand studio_removeaddons_a @studio_addons_envcpp)
  3090.  
  3091.                     (
  3092.                         (set studio_installpath "installdata/golded/add-ons/envCPP25/setup")
  3093.  
  3094.                         (studio_proc_uninstall)
  3095.                     )
  3096.                 )
  3097.  
  3098.                 (if (bitand studio_removeaddons_a @studio_addons_envstm)
  3099.  
  3100.                     (
  3101.                         (set studio_installpath "installdata/golded/add-ons/envSTM25/setup")
  3102.  
  3103.                         (studio_proc_uninstall)
  3104.                     )
  3105.                 )
  3106.  
  3107.                 (if (bitand studio_removeaddons_a @studio_addons_envsas)
  3108.  
  3109.                     (
  3110.                         (set studio_installpath "installdata/golded/add-ons/envSAS10/setup")
  3111.  
  3112.                         (studio_proc_uninstall)
  3113.                     )
  3114.                 )
  3115.  
  3116.                 (if (bitand studio_removeaddons_b @studio_addons_envasm)
  3117.  
  3118.                     (
  3119.                         (set studio_installpath "installdata/golded/add-ons/envASM13/setup")
  3120.  
  3121.                         (studio_proc_uninstall)
  3122.                     )
  3123.                 )
  3124.  
  3125.                 (if (bitand studio_removeaddons_b @studio_addons_envbat)
  3126.  
  3127.                     (
  3128.                         (set studio_installpath "installdata/golded/add-ons/envBAT13/setup")
  3129.  
  3130.                         (studio_proc_uninstall)
  3131.                     )
  3132.                 )
  3133.  
  3134.                 (if (bitand studio_removeaddons_b @studio_addons_envfax)
  3135.  
  3136.                     (
  3137.                         (set studio_installpath "installdata/golded/add-ons/envFAX10/setup")
  3138.  
  3139.                         (studio_proc_uninstall)
  3140.                     )
  3141.                 )
  3142.  
  3143.                 (if (bitand studio_removeaddons_b @studio_addons_envmdt)
  3144.  
  3145.                     (
  3146.                         (set studio_installpath "installdata/golded/add-ons/envMDT23/setup")
  3147.  
  3148.                         (studio_proc_uninstall)
  3149.                     )
  3150.                 )
  3151.  
  3152.                 (if (bitand studio_removeaddons_b @studio_addons_envthr)
  3153.  
  3154.                     (
  3155.                         (set studio_installpath "installdata/golded/add-ons/envTHR10/setup")
  3156.  
  3157.                         (studio_proc_uninstall)
  3158.                     )
  3159.                 )
  3160.  
  3161.                 (if (bitand studio_removeaddons_b @studio_addons_envjcy)
  3162.  
  3163.                     (
  3164.                         (set studio_installpath "installdata/golded/add-ons/envJCY50/setup")
  3165.  
  3166.                         (studio_proc_uninstall)
  3167.                     )
  3168.                 )
  3169.  
  3170.                 (if (bitand studio_removeaddons_c @studio_addons_envprt)
  3171.  
  3172.                     (
  3173.                         (set studio_installpath "installdata/golded/add-ons/envPRT63/setup")
  3174.  
  3175.                         (studio_proc_uninstall)
  3176.                     )
  3177.                 )
  3178.  
  3179.                 (if (bitand studio_removeaddons_c @studio_addons_envrcs)
  3180.  
  3181.                     (
  3182.                         (set studio_installpath "installdata/golded/add-ons/envRCS11/setup")
  3183.  
  3184.                         (studio_proc_uninstall)
  3185.                     )
  3186.                 )
  3187.  
  3188.                 (if (bitand studio_removeaddons_c @studio_addons_envins)
  3189.  
  3190.                     (
  3191.                         (set studio_installpath "installdata/golded/add-ons/envINS10/setup")
  3192.  
  3193.                         (studio_proc_uninstall)
  3194.                     )
  3195.                 )
  3196.  
  3197.                 (if (bitand studio_removeaddons_c @studio_addons_envwrp)
  3198.  
  3199.                     (
  3200.                         (set studio_installpath "installdata/golded/add-ons/envWRP10/setup")
  3201.  
  3202.                         (studio_proc_uninstall)
  3203.                     )
  3204.                 )
  3205.  
  3206.                 (if (bitand studio_removeaddons_c @studio_addons_envreg)
  3207.  
  3208.                     (
  3209.                         (set studio_installpath "installdata/golded/add-ons/envREG10/setup")
  3210.  
  3211.                         (studio_proc_uninstall)
  3212.                     )
  3213.                 )
  3214.  
  3215.                 (if (bitand studio_removeaddons_c @studio_addons_envswp)
  3216.  
  3217.                     (
  3218.                         (set studio_installpath "installdata/golded/add-ons/envSWP10/setup")
  3219.  
  3220.                         (studio_proc_uninstall)
  3221.                     )
  3222.                 )
  3223.             )
  3224.         )
  3225.     )
  3226. )
  3227.  
  3228. ; ------------------------------ error handling --------------------------------
  3229.  
  3230. (onerror
  3231.  
  3232.     (studio_proc_cleanup)
  3233.  
  3234.     (if (> @ioerr 0) 
  3235.  
  3236.         (
  3237.             ; set return code
  3238.  
  3239.             (delete "env:studioinstall")
  3240.  
  3241.             (textfile
  3242.  
  3243.                 (dest "env:studioinstall")
  3244.  
  3245.                 (append "INSTALLERROR")
  3246.             )
  3247.  
  3248.             (message
  3249.  
  3250.                 (cat #studio_installerror @ioerr)
  3251.             )
  3252.         )
  3253.     )
  3254.  
  3255.     (exit (quiet))
  3256. )
  3257.  
  3258. ; ------------------- check return code of previous installation ---------------
  3259.  
  3260. (if (exists "env:studioinstall" (noreq))
  3261.  
  3262.     ; (getenv) may not be used without checking if var exists (installer bug)
  3263.  
  3264.     (set studio_install_code
  3265.  
  3266.         (getenv "studioinstall")
  3267.     )
  3268.  
  3269.     (set studio_install_code "OK")
  3270. )
  3271.  
  3272. (if (= studio_install_code "INSTALLERROR")
  3273.  
  3274.     (
  3275.         (message #studio_notify)
  3276.     )
  3277. )
  3278.  
  3279. (delete "env:studioinstall")
  3280.  
  3281. (textfile
  3282.  
  3283.     (dest "env:studioinstall")
  3284.  
  3285.     (append "INCOMPLETE")
  3286. )
  3287.  
  3288. ; ---------------------------------- check setup -------------------------------
  3289.  
  3290. (if (exists "golded6.readme")
  3291.  
  3292.     (set studio_commercial 0)
  3293.     (set studio_commercial 1)
  3294. )
  3295.  
  3296. ; ----------------------------- find old installation --------------------------
  3297.  
  3298. (if (exists "golded:" (noreq))
  3299.  
  3300.     (
  3301.         (set studio_installdir (pathonly (expandpath "golded:")))
  3302.  
  3303.         (set studio_found
  3304.  
  3305.             (askbool
  3306.  
  3307.                 (prompt #studio_found)
  3308.  
  3309.                 (choices
  3310.  
  3311.                     #studio_found_confirm
  3312.                     #studio_found_newinstall
  3313.                 )
  3314.  
  3315.                 (help #studio_found_help)
  3316.             )
  3317.         )
  3318.     )
  3319.  
  3320.     (if (exists "work:" (noreq))
  3321.  
  3322.         (set studio_installdir "work:")
  3323.         (set studio_installdir "sys:")
  3324.     )
  3325. )
  3326.  
  3327. ; ---------------------------------- welcome -----------------------------------
  3328.  
  3329. (if (not (exists "env:" (noreq)))
  3330.  
  3331.     (
  3332.         (makedir "ram:env")
  3333.  
  3334.         (makeassign "env" "ram:")
  3335.     )
  3336. )
  3337.  
  3338. (if (= studio_found @studio_missing)
  3339.  
  3340.     (
  3341.         (message #studio_welcome)
  3342.  
  3343.         (welcome)
  3344.     )
  3345. )
  3346.  
  3347. (run "run <>NIL: installdata/programs/stopgolded")
  3348.  
  3349. ; --------------------------------- choose a path ------------------------------
  3350.  
  3351. ; create installation directory and temporary assign
  3352.  
  3353. (while (= studio_path "")
  3354.  
  3355.     (if (= studio_found @studio_found)
  3356.  
  3357.         (set studio_path (expandpath "golded:"))
  3358.  
  3359.         ; ELSE
  3360.  
  3361.         (
  3362.             ; keep requesting path until valid choice is made
  3363.  
  3364.             (set studio_repeat 1)
  3365.  
  3366.             (while (= studio_repeat 1)
  3367.  
  3368.                 (set studio_installdir
  3369.  
  3370.                     (askdir
  3371.  
  3372.                         (prompt #studio_path_choose)
  3373.  
  3374.                         (help #studio_path_choose_help)
  3375.  
  3376.                         (default studio_installdir)
  3377.                     )
  3378.                 )
  3379.  
  3380.                 (if (exists studio_installdir)
  3381.  
  3382.                     (set studio_repeat 0)
  3383.                     (set studio_repeat 1)
  3384.                 )
  3385.             )
  3386.  
  3387.             (set studio_path (tackon studio_installdir "Studio"))
  3388.  
  3389.             (if (exists studio_path)
  3390.  
  3391.                 (
  3392.                     (set studio_overwrite
  3393.  
  3394.                         (askbool
  3395.  
  3396.                             (prompt #studio_overwrite)
  3397.  
  3398.                             (choices
  3399.  
  3400.                                 #studio_overwrite_install
  3401.                                 #studio_overwrite_cancel
  3402.                             )
  3403.  
  3404.                             (help #studio_overwrite_help)
  3405.                         )
  3406.                     )
  3407.  
  3408.                     (if (= studio_overwrite 0)
  3409.  
  3410.                         (set studio_path "")
  3411.                     )
  3412.                 )
  3413.             )
  3414.         )
  3415.     )
  3416.  
  3417.     (if (<> studio_path "")
  3418.  
  3419.         ; installation of commercial version over demo version (and vice versa) is not supported
  3420.  
  3421.         (if (or (and (exists (tackon studio_path "demo") (noreq)) (= studio_commercial 1)) (and (exists (tackon studio_path "GoldED") (noreq)) (= studio_commercial 0)))
  3422.  
  3423.             (
  3424.                 (message #studio_demo)
  3425.  
  3426.                 (set studio_path "")
  3427.  
  3428.                 (set studio_found @studio_missing)
  3429.             )
  3430.  
  3431.             ; ELSE
  3432.  
  3433.             (
  3434.                 (set @default-dest studio_path)
  3435.  
  3436.                 ; check existing installation
  3437.  
  3438.                 (if (exists studio_path (noreq))
  3439.  
  3440.                     (
  3441.                         ; fairly complete installation ?
  3442.  
  3443.                         (if (and (exists (tackon studio_path "golded")) (exists (tackon studio_path "etc/registry/registry")))
  3444.  
  3445.                             (
  3446.                                 (set studio_update studio_path)
  3447.  
  3448.                                 (studio_proc_checksetup)
  3449.                             )
  3450.  
  3451.                             (
  3452.                                 ; repeat full initial installation
  3453.  
  3454.                                 (set studio_update "")
  3455.                             )
  3456.                         )
  3457.                     )
  3458.  
  3459.                     (makedir studio_path)
  3460.                 )
  3461.  
  3462.                 ; create assign
  3463.  
  3464.                 (makeassign "golded" studio_path)
  3465.  
  3466.                 ; verify assign
  3467.  
  3468.                 (if (not (exists "golded:" (noreq)))
  3469.  
  3470.                     (
  3471.                         (set studio_path "")
  3472.  
  3473.                         (set studio_found @studio_missing)
  3474.                     )
  3475.                 )
  3476.             )
  3477.         )
  3478.     )
  3479. )
  3480.  
  3481. ; install drawer icon
  3482.  
  3483. (set studio_drawer (cat studio_path ".info"))
  3484.  
  3485. (if (not (exists studio_drawer))
  3486.  
  3487.     (
  3488.         (copyfiles
  3489.  
  3490.             (source "installdata/workbench/drawer.info")
  3491.  
  3492.             (dest studio_installdir)
  3493.  
  3494.             (newname (fileonly studio_drawer))
  3495.         )
  3496.  
  3497.         (tooltype
  3498.  
  3499.             (dest studio_drawer)
  3500.  
  3501.             (noposition)
  3502.         )
  3503.     )
  3504. )
  3505.  
  3506. ; validate directory structure
  3507.  
  3508. (makedir "golded:add-ons")
  3509. (makedir "golded:add-ons/regedit")
  3510. (makedir "golded:etc")
  3511. (makedir "golded:etc/api")
  3512. (makedir "golded:etc/autorun")
  3513. (makedir "golded:etc/catalogs")
  3514. (makedir "golded:etc/charsets")
  3515. (makedir "golded:etc/env")
  3516. (makedir "golded:etc/fonts")
  3517. (makedir "golded:etc/images")
  3518. (makedir "golded:etc/images/sys")
  3519. (makedir "golded:etc/images/toolbar")
  3520. (makedir "golded:etc/images/wb")
  3521. (makedir "golded:etc/libs")
  3522. (makedir "golded:etc/recordings")
  3523. (makedir "golded:etc/registry")
  3524. (makedir "golded:etc/registry/presets")
  3525. (makedir "golded:etc/rexx")
  3526. (makedir "golded:etc/scanner")
  3527. (makedir "golded:etc/sessions")
  3528. (makedir "golded:etc/syntax")
  3529. (makedir "golded:etc/uninstall")
  3530. (makedir "golded:etc/updates")
  3531. (makedir "golded:etc/xref")
  3532.  
  3533. ; always update registry editor
  3534.  
  3535. (studio_proc_installregedit)
  3536.  
  3537. ; validate disk
  3538.  
  3539. (if (= studio_commercial 1)
  3540.  
  3541.     (if (<> (getsize "installdata/keyfile/keyfile") 67108864)
  3542.  
  3543.         (
  3544.             ; set return code
  3545.  
  3546.             (delete "env:studioinstall")
  3547.  
  3548.             (textfile
  3549.  
  3550.                 (dest "env:studioinstall")
  3551.  
  3552.                 (append "INSTALLERROR")
  3553.             )
  3554.  
  3555.             (abort #studio_ioerr)
  3556.         )
  3557.     )
  3558. )
  3559.  
  3560. ; ---------------------------------- register ----------------------------------
  3561.  
  3562. (if (or (= studio_yourname "") (= studio_serial ""))
  3563.  
  3564.     (while (= studio_registered 0)
  3565.  
  3566.         (set studio_repeat 1)
  3567.  
  3568.         (while (= studio_repeat 1)
  3569.  
  3570.             (set studio_yourname
  3571.  
  3572.                 (askstring
  3573.  
  3574.                     (prompt  #studio_yourname)
  3575.                     (help    #studio_yourname_help)
  3576.  
  3577.                     (default studio_yourname)
  3578.                 )
  3579.             )
  3580.  
  3581.             (if (= studio_yourname "")
  3582.  
  3583.                 (message #studio_yourname_help)
  3584.             )
  3585.  
  3586.             (if (= studio_yourname "")
  3587.  
  3588.                 (set studio_repeat 1)
  3589.                 (set studio_repeat 0)
  3590.             )
  3591.         )
  3592.  
  3593.         ; get serial number
  3594.  
  3595.         (if (= studio_commercial 1)
  3596.  
  3597.             (
  3598.                 (set studio_repeat 1)
  3599.  
  3600.                 (while (= studio_repeat 1)
  3601.  
  3602.                     (set studio_serial
  3603.  
  3604.                         (askstring
  3605.  
  3606.                             (prompt  #studio_serial)
  3607.                             (help    #studio_serial_help)
  3608.                             (default studio_serial)
  3609.                         )
  3610.                     )
  3611.  
  3612.                     (if (= studio_serial "")
  3613.  
  3614.                         (message #studio_serial_help)
  3615.                     )
  3616.  
  3617.                     (if (= (strlen studio_serial) 21)
  3618.  
  3619.                         (set studio_repeat 0)
  3620.                         (set studio_repeat 1)
  3621.                     )
  3622.                 )
  3623.             )
  3624.  
  3625.             ; ELSE
  3626.  
  3627.             (set studio_serial "Serial No. 0 (Demo)")
  3628.         )
  3629.  
  3630.         (set studio_registered
  3631.  
  3632.             (askbool
  3633.  
  3634.                 (prompt (#studio_check studio_yourname studio_serial))
  3635.  
  3636.                 (choices
  3637.  
  3638.                     #studio_check_continue
  3639.                     #studio_check_repeat
  3640.                 )
  3641.  
  3642.                 (help @askbool-help)
  3643.             )
  3644.         )
  3645.     )
  3646. )
  3647.  
  3648. ; ------------------------------- choose installation mode ---------------------
  3649.  
  3650. (set studio_installtype @studio_installtype_normal)
  3651.  
  3652. ; new installation ?
  3653.  
  3654. (if (= studio_update "")
  3655.  
  3656.     (set studio_installtype
  3657.  
  3658.         (askchoice
  3659.  
  3660.             (prompt #studio_installtype)
  3661.  
  3662.             (choices
  3663.  
  3664.                 #studio_installtype_minimum
  3665.                 #studio_installtype_user
  3666.                 #studio_installtype_normal
  3667.             )
  3668.  
  3669.             (help #studio_installtype_help)
  3670.  
  3671.             (default studio_installtype)
  3672.         )
  3673.     )
  3674. )
  3675.  
  3676. ; --------------------------------- choose components --------------------------
  3677.  
  3678. (if (= studio_update "")
  3679.  
  3680.     ; install new
  3681.  
  3682.     (
  3683.         (if (= studio_installtype @studio_installtype_minimum)
  3684.  
  3685.             (
  3686.                 (set studio_components @studio_components_golded)
  3687.                 (set studio_starter    0)
  3688.                 (set studio_manual     0)
  3689.                 (set studio_addons_a   0)
  3690.                 (set studio_addons_b   0)
  3691.                 (set studio_addons_c   0)
  3692.             )
  3693.  
  3694.             ; typical installation
  3695.  
  3696.             (
  3697.                 (set studio_components (- @studio_components_all @studio_components_addons))
  3698.                 (set studio_starter    @studio_components_all)
  3699.                 (set studio_manual     @studio_components_all)
  3700.                 (set studio_addons_a   0)
  3701.                 (set studio_addons_b   0)
  3702.                 (set studio_addons_c   0)
  3703.             )
  3704.         )
  3705.  
  3706.         (if (= studio_installtype @studio_installtype_user)
  3707.  
  3708.             (
  3709.                 ; choose categories
  3710.  
  3711.                 (set studio_components
  3712.  
  3713.                     (askoptions
  3714.  
  3715.                         (prompt #studio_components_install)
  3716.  
  3717.                         (choices
  3718.  
  3719.                             #studio_components_golded
  3720.                             #studio_components_starter
  3721.                             #studio_components_docs
  3722.                             #studio_components_addons
  3723.                             #studio_components_developer
  3724.                             #studio_components_screenshot
  3725.                             #studio_components_recover
  3726.                         )
  3727.  
  3728.                         (help #studio_components_help)
  3729.  
  3730.                         (default studio_components)
  3731.                     )
  3732.                 )
  3733.  
  3734.                 ; choose subcategories
  3735.  
  3736.                 (studio_proc_chooseparts)
  3737.             )
  3738.         )
  3739.  
  3740.         ; always install presets and registry when installing the editor
  3741.  
  3742.         (if (bitand studio_components @studio_components_golded)
  3743.  
  3744.             (
  3745.                 (studio_proc_chooselanguage)
  3746.  
  3747.                 (set studio_components (bitor studio_components @studio_components_config))
  3748.             )
  3749.         )
  3750.  
  3751.         ; edit user-startup
  3752.  
  3753.         (studio_proc_startup)
  3754.  
  3755.         ; install everything
  3756.  
  3757.         (studio_proc_installcomponents)
  3758.  
  3759.         (run "installdata/programs/moveicons <>NIL: grid dir=golded: dx=70 dy=65 columns=4 files GoldED \"Drag & Drop\" Recover Licence Uninstall Order Anleitung Manual Screenshot")
  3760.  
  3761.         ; install autorun macro
  3762.  
  3763.         (copyfiles
  3764.  
  3765.             (source "installdata/autorun/golded.rexx")
  3766.  
  3767.             (dest "golded:etc/autorun")
  3768.         )
  3769.  
  3770.         (run "golded:add-ons/regedit/regedit autorunrexx golded:etc/autorun/golded.rexx autodelete")
  3771.     )
  3772.  
  3773.     ; install over old installation
  3774.  
  3775.     (
  3776.         ; keep showing update menu
  3777.  
  3778.         (while (<> studio_updatemode @updatemode_exit)
  3779.  
  3780.             (
  3781.                 (set studio_updatemode
  3782.  
  3783.                     (askchoice
  3784.  
  3785.                         (prompt studio_path)
  3786.  
  3787.                         (choices
  3788.  
  3789.                             #studio_updatemode_reinstall
  3790.                             #studio_updatemode_add
  3791.                             #studio_updatemode_remove
  3792.                             #studio_updatemode_presets
  3793.                             #studio_updatemode_registry
  3794.                             #studio_updatemode_startup
  3795.                             #studio_updatemode_exit
  3796.                         )
  3797.  
  3798.                         (default studio_updatemode)
  3799.  
  3800.                         (help #studio_updatemode_help)
  3801.                     )
  3802.                 )
  3803.  
  3804.                 (if (or (= studio_updatemode @updatemode_add) (= studio_updatemode @updatemode_reinstall))
  3805.  
  3806.                     (
  3807.                         ; set defaults (none in <add> mode, installed components in <update> mode)
  3808.  
  3809.                         (if (= studio_updatemode @updatemode_add)
  3810.  
  3811.                             (
  3812.                                 (set studio_components 0)
  3813.                                 (set studio_starter    0)
  3814.                                 (set studio_manual     0)
  3815.                                 (set studio_addons_a   0)
  3816.                                 (set studio_addons_b   0)
  3817.                                 (set studio_addons_c   0)
  3818.                             )
  3819.                         )
  3820.  
  3821.                         (set studio_components
  3822.  
  3823.                             (askoptions
  3824.  
  3825.                                 (prompt #studio_components_update)
  3826.  
  3827.                                 (choices
  3828.  
  3829.                                     #studio_components_golded
  3830.                                     #studio_components_starter
  3831.                                     #studio_components_docs
  3832.                                     #studio_components_addons
  3833.                                     #studio_components_developer
  3834.                                     #studio_components_screenshot
  3835.                                     #studio_components_recover
  3836.                                 )
  3837.  
  3838.                                 (help #studio_components_help)
  3839.  
  3840.                                 (default studio_components)
  3841.                             )
  3842.                         )
  3843.  
  3844.                         (studio_proc_chooseparts)
  3845.  
  3846.                         (studio_proc_installcomponents)
  3847.  
  3848.                         (studio_proc_checksetup)
  3849.  
  3850.                         (run "installdata/programs/moveicons <>NIL: grid dir=golded: dx=70 dy=65 columns=4 files GoldED \"Drag & Drop\" Recover Licence Uninstall Order Anleitung Manual Screenshot")
  3851.                     )
  3852.                 )
  3853.  
  3854.                 (if (= studio_updatemode @updatemode_remove)
  3855.  
  3856.                     (
  3857.                         (set studio_remove
  3858.  
  3859.                             (askoptions
  3860.  
  3861.                                 (prompt #studio_components_remove)
  3862.  
  3863.                                 (choices
  3864.  
  3865.                                     #studio_components_golded
  3866.                                     #studio_components_starter
  3867.                                     #studio_components_docs
  3868.                                     #studio_components_addons
  3869.                                     #studio_components_developer
  3870.                                     #studio_components_screenshot
  3871.                                     #studio_components_recover
  3872.                                 )
  3873.  
  3874.                                 (help #studio_components_help)
  3875.  
  3876.                                 (default 0)
  3877.                             )
  3878.                         )
  3879.  
  3880.                         (studio_proc_removeparts)
  3881.  
  3882.                         (studio_proc_removecomponents)
  3883.  
  3884.                         (studio_proc_checksetup)
  3885.  
  3886.                         (run "installdata/programs/moveicons <>NIL: grid dir=golded: dx=70 dy=65 columns=4 files GoldED \"Drag & Drop\" Recover Licence Uninstall Order Anleitung Manual Screenshot")
  3887.                     )
  3888.                 )
  3889.  
  3890.                 (if (= studio_updatemode @updatemode_presets)
  3891.  
  3892.                     (studio_proc_installpresets)
  3893.                 )
  3894.  
  3895.                 (if (= studio_updatemode @updatemode_registry)
  3896.  
  3897.                     (studio_proc_registry)
  3898.                 )
  3899.  
  3900.                 (if (= studio_updatemode @updatemode_startup)
  3901.  
  3902.                     (studio_proc_startup)
  3903.                 )
  3904.             )
  3905.         )
  3906.     )
  3907. )
  3908.  
  3909. ; ------------------------------------- done -----------------------------------
  3910.  
  3911. (studio_proc_savecfg)
  3912.  
  3913. (studio_proc_cleanup)
  3914.  
  3915. ; set return code
  3916.  
  3917. (delete "env:studioinstall")
  3918.  
  3919. (textfile
  3920.  
  3921.     (dest "env:studioinstall")
  3922.  
  3923.     (append "OK")
  3924. )
  3925.  
  3926. (complete 100)
  3927.  
  3928. (if (= studio_reboot 1)
  3929.  
  3930.     (exit #studio_reboot)
  3931.     (exit)
  3932. )
  3933.  
  3934. (welcome)
  3935.